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EDITORIALE 



N on stiamo per riproporre l’editoriale del secondo numero, come qual- 
cuno può aver pensato. Vogliamo solo tornare sull’argomento per 
rispondere alle numerose lettere che giungono in redazione e contestano 
la decisione di abbinare la cassetta alla rivista. 

Dovendo prendere una decisione senza possibilità alternative era prevedi- 
bile lo scontento di alcuni e il favore di altri. 

Esistono, peraltro, le leggi del mercato, che gli operatori devono assoluta- 
mente rispettare, pena la disfatta. 

Se il mercato chiede un certo tipo di prodotto (il questionario rappresenta 
solo una conferma alle già numerose richieste), è necessario soddisfare 
al meglio tali domande. 

Le critiche sono dunque ingiustificate poiché, come sempre, è la maggio- 
ranza che sceglie la politica alla quale gli operatori commerciali devono 
necessariamente attenersi. 

Contrariamente a quanto qualcuno crede, la possibilità di abbonarsi alla 
sola rivista non è un discorso politico per acquisire abbonamenti (leggi 
“o mangi questa minestra...”), ma è per noi un problema in più da risolve- 
re in termini di gestione. Ci è sembrato comunque giusto, nonostante 
tutto, lasciare all’utente un minimo di scelta. 

La rivista esce con notevole ritardo, ma stiamo lavorando per ovviare e 
per essere presenti in edicola entro la prima settimana del mese. 

Per il futuro speriamo di poter effettuare le spedizioni agli abbonati una 
decina di giorni prima dell’uscita in edicola. 

Per concludere stiamo lavorando solo per dare, in tempi accettabili, un 
prodotto sempre più vicino alle vostre aspettative. 

Pietro Dell’Orco 
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Per collaborare a SUPERS1NC 


La maggior parte dei seguenti suggerimenti ha lo scopo di migliorare Paccutezza e la velocità 
di pubblicazione di un articolo; rispettando questi consigli si accresceranno le probabilità che 
un vostro lavoro venga pubblicato. La rivista è interessata ad articoli e programmi riguardanti 
la linea Sinclair. Siamo più interessati al contenuto di un articolo piuttosto che al suo stile, 
e soprattutto gli articoli devono essere chiari ed esaurienti. La seguente guida permetterà 
che le vostre buone idee e i vostri programmi vengano più facilmente accettati per la pubblica- 
zione: 


1 l’angolo superiore sinistro della prima pagina 
dovrà contenere: nome, cognome, indirizzo, 
numero telefonico, codice fiscale, data di spedi- 
zione, luogo e data di nascita. 

l’angolo superiore destro della prima pagina 
dovrà contenere la marca e il tipo di compu- 
ter al quale il lavoro si riferisce, unitamente alla 
configuraszione richiesta (memoria occorrente, 
eventuali periferiche e così via). 

3 il titolo sottolineato dell’articolo dovrà inizia- 
re a due terzi in altezza della prima pagina, 
le pagine seguenti potranno essere battute 
normalmente, con la condizione che l’angolo 
superiore destro contenga un’abbreviazione del 
titolo e del cognome, unitamente al numero di 
pagina progressivo. Per esempio, Horace Goes... 
/Brambilla/2. 

5 tutte le linee del testo dovranno essere battu- 
te con spazio 2 o spazio 3, e un margine di 
circa un centimetro dovrà trovarsi ad entrambi i 
lati dello scritto. 

6 dovrà essere usata una carta formato A4 e 
lo scritto dovrà occupare un solo lato del 
foglio (caratteri maiuscoli e minuscoli). 

9J\ fogli dovranno essere uniti con una clip. 

8 avendo intenzione di spedire più di un artico- 
lo, questi dovranno essere inviati separata- 
mente insieme alla rispettiva copia su supporto 
magnetico. 

9 programmi brevi (meno di 20 linee) potranno 
essere inseriti nel testo, mentre programmi 
più lunghi dovranno essere listati separatamente. 
E ESSENZIALE per noi disporre di una copia 
del programma registrata più volte su supporto 
magnetico, su entrambi i lati dello stesso. E prefe- 
ribile usare nastri di buona qualità e di lunghezza 
non eccessiva; la cassetta o il la cartuccia per 
Microdrive dovranno essere etichettati con il no- 
me dell’autore, il titolo dell’articolo, il titolo del- 


l’articolo, il computer interessato e soprattutto 
le eventuali espansioni richieste. Come suggeri- 
menti di programmazione si consiglia di usare 
per esigenze di stampa listati, le istruzioni INK, 
PAPER, INVERSE piuttosto che scrivere detta- 
mente in INVERSE VIDEO. Un rapido controllo 
dei programmi per operare queste sostituzioni 
sarà da noi estremamente apprezzato. 

per maggior chiarezza, all’interno dell’ar- 
ticolo è conveniente usare caratteri maiu- 
scoli riferendosi a istruzioni BASIC (esempio RE- 
TURN, LIST, RND, PRINT etc.). Se si desidera 
evidenziare una parola, è preferibile sottolinearla 
piuttosto che scriverla in carattere maiuscolo. 

n gli articoli ed i programmi potranno avere 
qualsiasi lunghezza - da una routine di 
una sola linea fino a programmi molto complessi, 
volendo includere fotografie, questi do- 
vranno avere formato 24x36, o 6x6, in 
bianco e nero o diapositive. 

non prenderemo in considerazione artico- 
li che siano stati sottoposti ad altre case 

editrici. 

il compenso per la collaborazione presta- 
ta sarà commisurato alla complessità e 
all’interesse del programma (da un minimo di L. 
50.000 a un massimo di L. 300 . 000 ). Il paga- 
mento è effettuato in caso di pubblicazione del la- 
voro. 

il materiale ricevuto e non pubblicato non 
verrà restituito. 


Spedite i vostri lavori a: 

SUPERSINC 
Via Rosellini, 12 
20124 Milano 

e saremo lietissimi di pubblicare i contri- 
buti migliori. 

La Redazione 
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Sei domande a Supersinc 

Carissimi “amiconi” di $$ (ovvero SU- 
PERSINC), vi voglio porre alcune do- 
mande: 

1) vi sono programmi , in Italia , riguar- 
danti svolgimenti di equazioni algebriche, 
espressioni, problemi di fisica e geome- 
tria, naturalmente per lo Spectrum 48K? 

2) Come si ottiene sullo Spectrum la radi- 
ce quadrata di un numero ? 

3) In che modo si può collegare lo Spec- 
trum allo stereo di casa, per sentire il 
sonoro di un gioco attraverso le casse 
del proprio apparecchio hi- fi? 

4) Qual è, secondo voi, il gioco migliore 
tra “Ant Attack”, “ Jetpac ”, “Jet Set Wil- 
ly” e “Chequered Flag”? 

5) Perché non pubblicate qualche listato 
riguardante agende telefoniche, bilanci 
familiari o qualche utility? 

6) Vi sono in Italia cartucce ROM o cas- 
sette per uno Spectrum espanso a 80K? 
Se la risposta è negativa, quando arrive- 
ranno? 

Dopo avervi assillato con tutte queste do- 
mande, vi chiedo di pubblicare il mio 
indirizzo, in modo che possa entrare in 
contatto con qualche Sinclub milanese o 
comunque altri possessori della piccola 
“scatoletta” nera di cui sono orgoglio- 
so! 

Bruno Cover - v.le D. Ranzoni 1 
- 20149 Milano - tei. 4033117 

Cercheremo di essere sintetici, ma, spe- 
riamo, esaurienti: 

1) rivolgiti alla REBIT; lì dovresti trova- 
re quello che cerchi. 

2) La radice quadrata di un numero si 
ottiene con la funzione SQR (dall’ingle- 
se SQuare Root), presente sulla tastiera 
dello Spectrum in corrispondenza del 
tasto H e digitabile in modo esteso (cioè 
dopo aver premuto contemporanea- 
mente CAPS SHIFT e SYMBOL 
SHIFT). Prova, per fare un semplicissi- 
mo esempio, a digitare PRINT SQR 4. 


3) Devi collegare l’impianto stereo al 
computer attraverso le rispettive prese 
MIC, azionando il PLAY del registrato- 
re, senza cassette inserite (o, se la pre- 
senza di una di esse è proprio indispen- 
sabile, inserendo una cassetta vuota). 

4) Si tratta di giochi di diverso argomen- 
to, rivolti a diverse categorie di appas- 
sionati. Forse “Jetpac” è un po’ datato 
(oltre che di gran lunga superato dall’in- 
credibile “Lunar Jetman”), ma pur sem- 
pre eccitante, godibile e... difficile. Noi 
pensiamo che tutti i quattro “big” che 
citi siano eccezionali, anche se nutriamo 
una certa preferenza per “Jetpac” e 
“Jet set Willy”: invitiamo i lettori a man- 
darci le loro classifiche personali! 

5) Per quanto ci è possibile vedremo di 
dare sempre più spazio alle utility, men- 
tre i programmi del genere “database” 
non mancano; si tratta solamente di 
spendere un pochino di tempo per adat- 
tarli alle proprie esigenze personali. Al- 
trimenti il consiglio più valido è quello 
di aspettare: vedrai che prima o poi ver- 
rà pubblicato proprio il programma che 
cercavi. 

6) A quanto ci risulta, no; né crediamo 
arriveranno, data la scarsissima diffu- 
sione degli Spectrum 80K. 

O.K.? 


Programmi prò programmatori 
promettenti 

Potete dare semplici consigli per la pro- 
grammazione? 

Giovanni Fiorio 
Palo del Colle (BA) 

Li stiamo già dando: lo studio dei pro- 
grammi pubblicati, con l’ausilio delle 
spiegazioni e dei commenti inseriti negli 
articoli, fornisce una vera e propria mi- 
niera di consigli, tecniche, trucchi e sot- 
tigliezze programmatorie utili a tutti i li- 
velli. 


E 


Gli errori “di sbaglio” 

Sono un nuovo appassionato di personal 
computer e già sono... nei guai ! Infatti, 
avendo copiato per filo e per segno alcu- 
ni vostri programmi ho avuto degli sgra- 
devoli problemi, che ora vi elencherò... 

lettera firmata 
(in modo illeggibile) 


Con l’inserimento della cassetta nella 
rivista le lettere di questo tenore sono 
praticamente scomparse; tuttavia, ne 
riprendiamo una per invitare alla massi- 
ma attenzione tutte le volte che capita 
di introdurre un programma da tastiera. 
Nella fattispecie, il nostro lettore si la- 
mentava di cinque programmi pubblica- 
ti su SUPERSINC; dopo l’ennesimo 
controllo, abbiamo ancora una volta ve- 
rificato la totale esattezza dei listati in 
questione. Ma non è finita; dei cinque 
programmi, due erano per ZX81 (come 
era stato scritto chiaramente all’inizio 
del listato), e non per Spectrum, mentre 
altri due davano errori del tipo “Integer 
out of range” o “Variable not found”. 
Orbene, gli errori di questo tipo sono 
dovuti per il 99% delle volte a errori di 
trascrizione, anziché a bachi presenti 
nel listato. Può accadere che in un pro- 
gramma ci sia un errore, diciamo, “con- 
cettuale”, questo sì: ma è praticamente 
impossibile trovare problemi del genere 
di quelli già citati (là dove un altro mem- 
bro della malvagia famiglia è “Out of 
DATA”). In caso di errore, comunque, 
verrà sempre pubblicato un errata cor- 
rige a distanza di uno o al massimo due 
numeri della rivista: in mancanza di tale 
riscontro si può concludere che, quasi 
certamente, l’errore non stia nel listato, 
ma nella propria distrazione o trascura- 
tezza, indipendentemente dal numero 
dei controlli o delle verifiche effettua- 
te. 
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PRINT e punto e virgola 

Non avendo molte possibilità di cercarmi 
un “professore di BASIC”, vorrei le se- 
guenti informazioni: 

1) come lavora il punto e virgola finale 
di una linea di programma; 

2) cosa significa una singola istruzione 
PRINT. 

Antonio Capace - Milano 

Ogni istruzione PRINT provoca, prima 
della stampa effettiva sullo schermo, 
una “andata a capo”; l’aggiunta di un 
punto e virgola alla fine di una linea 
serve a garantire che anche il testo suc- 
cessivo venga stampato sulla stessa riga 
di schermo di quello precedente. Una 
semplice PRINT, non accompagnata da 
testo, sta ad indicale, per l’appunto, il 
“ritorno carrello”. E possibile evitare di 
mettere più PRINT in fila ricorrendo al- 
la forma sintetica “’” (PRINT””“ecce- 
tera”, ad esempio, va a capo quattro 
volte prima di scrivere “eccetera”). Uno 
degli usi di PRINT che non segue la rego- 
la del “ritorno carrello” è costituito da 
PRINT AT, istruzione che consente di 
stampare perennemente nello stesso 
punto dello schermo. Può essere un 
buon esercizio trovarne altri, aiutandosi 
col manuale, che in questo caso è di- 
scretamente chiaro. 


IN aiuto di un 44 creativo” 

Spettabile redazione di SUPERSINC, 
nella creazione dei miei programmi, so- 
prattutto giochi , mi si presenta un grave 
problema; quando viene premuto un ta- 
sto gli altri risultano disattivati. Vi prego 
di suggerirmi una soluzione che mi per- 
metta di usare due o più tasti, ovviando 
al blocco del sistema. 

Edoardo Zucconi - Roma 

Lo Spectrum offre un’ottima soluzione 
a questo problema: l’uso della funzione 
IN, abbondantemente impiegato e spie- 
gato in molti programmi di SUPER- 
SINC. In mancanza di meglio, nel capi- 
tolo 23 del manuale si possono trovare 
ulteriori spiegazioni; vedremo comun- 
que di tornare più dettagliatamente sul- 
l’argomento. 


Calmai... 

SUPERSINC dovrebbe uscire più spes- 
so, almeno quindicinalmente. . . 

Fabio Moro - Tivoli (RM) 

Caro Fabio, 

temiamo che almeno per un po’ dovrai 
accontentarti della periodicità mensile: 
chissà che in futuro... 


Unico difetto: la Grafica 

Carissimi di SUPERSINC, 
sono un possessore di Spectrum della 
“ penultima ” ora, per cui non sono molto 
esperto nel programmare. Vi seguo dal 
primo numero e vorrei alcuni chiarimen- 
ti: 

1) non vi sembra che il rapporto giochi/ 
utility sia troppo a favore dei primi ? 
Riempire una rivista di giochi è facile , ma 
questo significa svalutare le capacità di 
un computer... degradandolo a consol- 
le ! 

2) Perché non stampate su carta più “vi- 
le”, ma più economica? Molte riviste 
(specialmente americane) lo fanno, po- 
tendosi così permettere molte più pagi- 
ne, col conseguente vantaggio di aumen- 
tare il contenuto della rivista stessa. 

3) Come mai i listati sono scritti a caratte- 
ri così grossi, che occupano moltissimo 
spazio? Potreste mantenere la chiarezza 
del listato pur riducendone di molto le 
dimensioni, soluzione già adottata da al- 
tre riviste. 

4) Non riesco a caricare i caratteri grafici 
dei vostri giochi ; i programmi funziona- 
no, ma sullo schermo si muovono gli 
UDG non modificati! 

Nicola Saponari - Milano 

Carissimo Nicola, 

1) può darsi: dobbiamo fare i conti an- 
che col materiale che abbiamo a dispo- 
sizione,ma ti garantiamo che facciamo 
tutto il possibile per dare alle utility 
sempre più spazio. In questo senso ci 
sentiamo di dare una tiratina d’orecchi 
a tutti quelli che ci mandano cassette di 
giochi, giochi e solamente giochi ;devi 
però riconoscere che spesso è più facile 
mettere al lavoro la fantasia che non le 
proprie conoscenze. 

2) Perché pensiamo che SUPERSINC 
debba essere bella e godibile non solo 
nella sostanza, ma anche nella forma, 
piacevole da leggere e guardare come 
da usare. Certo questa scelta implica 
maggiori costi di produzione, ma dà alla 
rivista una immagine senza dubbio mi- 
gliore. A questo punto aspettiamo il pa- 
rere di tutti... 

3) Per garantire in ogni caso la perfetta 
leggibilità del listato, anche quando ma- 
gari lo sguardo è fisso sullo schermo del 
computer e la rivista è posta al nostro 
fianco, a una certa distanza, o quando 
per un qualunque inconveniente di 
stampa “salta” un pezzo di pagina (non 
è ancora successo, ma potrebbe) can- 
cellando nel nostro caso una riga, forse 
due, senza però danneggiare in modo 
irrimediabile interi blocchi di linee; an- 
che qui ci piacerebbe sentire più opinio- 
ni. 

4) Quasi certamente ti dimentichi di in- 
serire i caratteri grafici col cursore in 
modo “G”: prova a pensarci su... tenen- 
do presente che i nostri programmi so- 
no tutti verificati e non è possibile che 
venga lasciato passare un simile incon- 
veniente. 


P.S.: anche “Bioritmi” funziona perfet- 
tamente! 

L’hobby de 44 Lo Hobbit” 

Visto che sono riuscito a completare “Lo 
Hobbit” e a conseguire un punteggio per- 
centuale del 100%, penso che eventuali 
miei “colleghi” saranno felici di vedere 
quali sono i “trucchi” che mi hanno per- 
messo di raggiungere questo risultato. 
Come molti già sapranno, non è consi- 
gliabile cercare di uccidere i troll per 
prendere loro la chiave : basta aspettare 
l'alba, momento in cui essi verranno tra- 
mutati in rocce dal sole. L'anello dell'in- 
visibilità si trova nel labirinto degli orchi 
(o goblin): Gollum, però , cercherà di 
ostacolarvi. Non avrete quindi altra scel- 
ta che quella di ucciderlo, o dovrete ri- 
spondere ai suoi indovinelli (sono solo 2). 
Per attraversare il fiume che si trova vici- 
no al “Bewitched g/oomy place ” dovrete 
“lanciare la corda attraverso il fiume” 
(throw thè rope across thè river) per 
prendere la barca; dopo di che, per en- 
trare in quest'ultimo, bisognerà dare il 
comando “ climb into thè boat”. Queste 
sono le uniche difficoltà grammaticali del 
gioco. 

La “ Magic door” non si apre, con nessu- 
na chiave ; bisogna indossare l'anello e 
quindi esaminare la porta, che poi si apri- 
rà da sola. Il modo più conveniente di 
arrivare alla città del lago è quello di 
saltare sul barile lanciato dal maggiordo- 
mo nelle sale del re degli elfi. Bard è 
l'unico in grado di uccidere il drago; vi 
riesce nel 90% dei casi. Altrimenti fuggi- 
te (ne avete il tempo) e riprovate ancora. 
La “golden key” serve a una sola cosa: 
farvi scervellare per capire come possa 
tornare utile, per cui lasciatela stare. La 
“small curious key”, invece, serve per 
aprire la “side door”. Per uscire vivi dalla 
“forest road” c'è un solo sistema: andare 
due volte in una direzione, aspettare due 
volte e proseguire (per esempio: West- 
West- Wait-Wait- West). Se venite cattura- 
ti dal “wood elf”, suicidatevi, perché do- 
vete ricominciare tutto dall'inizio. 

“The place is too full for you to enter” 
è un messaggio utilizzato per operazioni 
di debugging, che P. Mitchell ha dimenti- 
cato di togliere : ignoratelo. Infine, anche 
se è molto noto, ricordo che uno hobbit 
è grande quanto un coniglio : come può 
scappare da una finestra, se non viene 
aiutato da amici alti? Gandalf è un mago, 
Thorin un nano, ed entrambi riescono 
ad arrampicarsi per uscire dalla finestra : 
basta che chiediate loro di prendervi sul- 
le spalle e siete a posto ! 

Per concludere, auguro a tutti di essere 
proclamati “master adventurer”, risol- 
vendo, come ho fatto io, il 100% dell'av- 
ventura. 

Andrea Sibaldi - Pistoia 

Pensiamo che tutti gli avventurieri gra- 
diranno molto non solo gli auguri, ma 
anche questa preziosa serie di consi- 
gli! 
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A colloquio con Vincenzo Garla- 
schelli, direttore generale della 
Sinclair Italia 

M i reco, più o meno all’ora di pranzo, 
verso la sede della Columbia Marke- 
ting, in pieno centro di Milano, per poter 
essere puntuale all’appuntamento con 
quella che in questo momento è una delle 
persone che maggiormente condizione- 
ranno le future decisioni di tutti i sinclairi- 
sti. Rimugino intanto per la mente qual- 
che interrogativo: quali saranno i piani 
Sinclair per lo Spectrum, “scatoletta”ec- 
cezionale, ma progressivamente sempre 
più sfruttata fino ai suoi limiti estremi? 
L’amato ZX farà la fine del TI-99 Texas 
Instruments? O ci troviamo invece di 
fronte a una nuova “età dell’oro” per 
questo computer, dopo le più che cospi- 
cue vendite del periodo natalizio? Quali 
saranno i progetti che dovranno tentare 
di rispondere alle crescenti esigenze dei 
possessori di un Sinclair, in costante au- 
mento e sparsi per tutto il territorio nazio- 
nale, sul quale, fatta eccezione per poche 
aree fortunate, si incontrano gravi proble- 
mi di reperimento di assistenza qualifica- 
ta ed è difficile - per non dire impossibile 
— trovare le novità hardware e software 
se non con ritardi insostenibili (e magari 
a prezzi da ladrocinio)? 

Altri interrogativi sorgono sull’ultima rea- 
lizzazione in campo computer di sir Clive, 
il QL, il tanto atteso “fratello maggiore” 
dello Spectrum, finora contraddistinto 
dalle mille versioni e dai diecimila rifaci- 
menti e ormai circondato da un alone 
quasi misterioso: funziona davvero? 
Quando arriva in Italia ufficialmente? E 
il software applicativo fornito unitamente 
al computer? In Redazione abbiamo avu- 
to occasione di provare brevemente un 
QL in versione definitiva (quella “targa- 
ta” JM), ma certamente sarebbe meglio 
avere chiarimenti da una voce sicuramen- 
te più autorevole del confuso vociare bri- 
tannico o dei sussurri delle confraternite 
italiche riunite attorno a qualche singolo 
fortunato reduce da un viaggio a Lon- 
dra... e finalmente sono faccia a faccia 
col direttore della Sinclair Italia, Vincen- 


zo Garlaschelli. Giovane, dal carattere 
volitivo ed energico, appare estremamen- 
te convinto di ciò che dice e della validità 
delle scelte che ha in progetto di compie- 
re. Il nostro breve, ma esauriente collo- 
quio, dopo una succinta presenta del- 
l’attività J .soft nel settore Sinclair, verte 
quasi immediatamente sui progetti per il 
futuro immediato: innnanzitutto la crea- 
zione di una rete capillare di assistenza 
per gli utenti ZX81, Spectrum e QL. 
“Intendiamo costituire almeno cento- 
centodieci punti assistenza altamente 
qualificati, direttamente assistiti dalla Sin- 
clair Italia per la consulenza tecnica e le 
forniture di ogni nostro prodotto hard/ 
soft” dichiara Garlaschelli, “selezionati 
tra i laboratori interessati che, in base alle 
nostre informazioni, siano in grado di ga- 
rantire il miglior servizio possibile. Il per- 
sonale”, prosegue, “verrà addestrato con 
corsi specifici e tutta la documentazione 
messa a disposizione sarà in italiano. Con- 
tiamo di rendere operativa l’intera strut- 
tura in pochissimo tempo”. Ma come si 
può arrivare a costruire velocemente una 
rete di diffusione capillare (“vogliamo che 
in ogni capoluogo di provincia ci sia alme- 
no un centro di assistenza: è ingiusto che 
un proprietario di Spectrum che abiti, per 
dire, a Marsala, non sia in grado di procu- 
rarsi un pezzo di ricambio o non possa 
ricevere una consulenza”) che sia anche 
efficiente? Evidentemente, anche i labo- 
ratori specializzati non possono rimanere 
passivi, ma devono contribuire al formar- 
si di un rapporto di stretta collaborazione, 
in primissimo luogo nella presa dei con- 
tatti con la società. “Contiamo molto su 
un feedback positivo dei vari laboratori 
in questo senso”, conclude Garlaschelli. 

Il direttore generale della Sinclair Italia 
prosegue col suo discorso. Anche a causa 
del poco tempo a disposizione di entram- 
bi, mi rendo conto che la progettata inter- 
vista sta saltando; pur trasformandosi in 
questo senso, l’incontro resta comunque 
l’occasione di una raccolta di informazioni 
utili, soprattutto per conoscere le linee 
generali della strategia Sinclair nel nostro 
paese. 

Si parla ora di software e della necessità 


di favorire la nascita anche in Italia, come 
in Inghilterra, di un gran numero di buoni 
programmatori, fino ad ora scoraggiati 
dalle difficoltà di mercato (primariamente 
le scarse possibilità di riuscire a vendere 
un numero consistente di copie di un pro- 
gramma, in modo tale da poter abbassare 
il prezzo di vendita, sempre seguendo le 
orme del Regno Unito), pirateggiamenti 
vari inclusi. Una rete di assistenza e di 
vendita a livello provinciale che sia in gra- 
do di coprire l’intero territorio nazionale, 
come quella che si sta prefigurando nelle 
parole di Garlaschelli, potrebbe risolvere 
almeno in parte questi problemi. “E ora 
di creare un’alternativa al “solito” softwa- 
re inglese, oltre che all’italianizzazione di 
quest’ultimo: vogliamo software originale 
italiano, realizzato da autori italiani capa- 
ci, che selezioneremo attraverso contatti 
con le riviste del settore e i club. Ai più 
bravi e meritevoli verrà offerta la possibi- 
lità della commercializzazione col mar- 
chio Sinclair”, secondo modalità variabili 
da caso a caso. Inoltre, questo tipo di 
produzione tenderà il più possibile a privi- 
legiare non i giochi, fin troppi, ma i pro- 
grammi realmente seri ed utili, posti in 
vendita a prezzi estremamente competiti- 
vi. 

Proseguendo, il dialogo va a toccare lo 
Spectrum: tocca adesso a me rispondere 
a qualche domanda riguardo alle opinioni 
dei lettori di SUPERSINC, sulle lettere 
che quotidianamente giungono in Reda- 
zione, per potersi fare un’idea delle reali 
esigenze, dei motivi di soddisfazione e 
delle lamentele del “paese reale” infor- 
matico, prima di domandare a mia volta 
quali sono i progetti futuri della Sinclair 
per ciò che concerne lo Spectrum. Ab- 
bandono a breve scadenza, rilancio in 
grande stile o...? “Il prossimo arrivo del 
QL non penalizzerà certamente lo Spec- 
trum, che da parte sua è più che mai vivo 
e in salute. Siamo sicuri di vendere, du- 
rante il prossimo anno, un quantitativo di 
computer che non posso rivelare, ma che 
da solo basterebbe a togliere ogni dubbio 
a questo riguardo. Passerà ancora del 
tempo prima che lo Spectrum in Italia 
entri nella sua parabola discendente”. 
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OK per lo Spectrum; e il QL? Sulla data 
precisa del suo arrivo non ci sono più che 
illazioni, le stesse che accompagnano la 
sua effettiva efficienza in ogni dettaglio. 
“In Gran Bretagna vengono da tempo 
venduti QL in versione definitiva, perfet- 
tamente funzionanti, come già sapete. La 
Psion ha appena terminato la revisione 
definitiva di Quill, Abacus, Archive ed Ea- 
sel; la versione italiana del QL sarà distri- 
buita non appena la Sinclair Italia sarà 
operativa a tutti gli effetti, il che acca- 
drà entro aprile/maggio. 

Naturalmente, l’assistenza sarà fornita 
anche ai possessori di QL non ufficiali; 
i compratori di QL distribuiti dalla Sin- 
clair Italia avranno però il vantaggio di 
essere tutelati da una garanzia efficace. 
E lo stesso varrà per Spectrum e Spec- 
trum +. 

I QL, a torto o a ragione, si è guada- 
gnato una cattiva fama di ritardi nelle 
consegne, prenotazioni da effettuarsi me- 
si prima e via dicendo: queste voci trove- 
ranno un’ennesima conferma? “Mi con- 
senta di dire che su questo argomento 
molti hanno speculato in maniera eccessi- 
va e del tutto sproporzionata rispetto al- 
l’entità reale del fenomeno. In ogni caso 
questo non avverrà più: è finito il tempo 
in cui si comprava sul venduto, facendo 
ordinazioni in Inghilterra solamente una 
volta in possesso di un numero consisten- 
te di richieste; ogni centro di assistenza, 
ogni negozio, ogni software house potrà 
disporre in qualunque momento della 
quantità desiderata di prodotti Sinclair, 
senza ritardi ed inconvenienti”. 

“Non voglio fare un lavoro che duri solo 
qualche mese o qualche anno: voglio fare 
un lavoro che duri sempre e che sia fatto 
bene”, conclude Garlaschelli, concluden- 
do anche il nostro breve, ma produttivo 
incontro. Uscendo dall’edificio, mentre 
valuto tra me e me le possibilità di intrec- 
ciare un rapporto di collaborazione che 
andrebbe a beneficio di tutti i lettori di 
SUPERSINC (e avverto micidiali i morsi 
della fame...), un pensiero è su tutti: al- 
meno sul piano dei progetti penso che il 
destino informatico dei sinclairisti italiani 
sia in buone mani, molto più di quanto 
non sia stato finora; in attesa di verificare 
nella realtà dei fatti la fondatezza di que- 
sta impressione, tanti auguri di buon lavo- 
ro alla nuova realtà Sinclair Italia e, in 
particolare, al suo direttore. 


ATTENZIONE! 

Alcuni giochi presenti in questo numero (come CITTÀ D’ITALIA, COLLIDERS, 
e ANDRE) utilizzano particolari tecniche di programmazione, che possono 
creare problemi durante il ricaricamento dei programmi successivi. 

Per questa ragione consigliamo, prima di caricare ogni programma, di- 
effettuare un reset spegnendo e riaccendendo il computer o digitando RUN 
USR f (o - per chi possiede lo Spectrum + — utilizzando l’apposito pulsante). 


Il “chi è” di Vincenzo Garlaschelli 

di Lucio Bragagnolo 

Piccolo ritratto del sinclairista più importante d'Italia 


N ato ad Albairate (provincia di Milano) trentanove anni fa, Vincenzo 
Garlaschelli ha mosso i suoi primi passi informatici a partire dal 1966, 
anno in cui cominciò a lavorare all’interno della “realcasa”, la IBM. 

Dopo 13 anni (nel 1979) passò alla direzione commerciale Data Service 
della Control Data, dove rimase fino all’inizio del 1983. 

“In quegli anni” - racconta - “malgrado la positiva e, per alcuni aspetti, 
sorprendente esperienza maturata nel campo dei Data Base attraverso 
l’utilizzo dei più potenti calcolatori esistenti al mondo, come il Cyber 205, 
mi andavo sempre più convincendo che il futuro dell’informatica fosse 
affidato non ai grandi bensì ai piccoli sistemi, che sarebbero nati in numero 
costantemente maggiore, parallelamente allo sviluppo di tecnologie sempre 
più sofisticate”. Per inciso, il 1979 è l’anno in cui Clive Sinclair, non ancora 
baronetto, cominciò a vendere in Gran Bretagna, per corrispondenza, un 
rivoluzionario quanto minuscolo computer chiamato ZX80. 

Attratto dalle enormi possibilità potenziali di quello che noi oggi chiamiamo 
il mercato degli home computer, Garlaschelli contattò società come Wang, 
Apple e Commodore, fino ad approdare, nel giugno 1983, alla Commodore 
italiana, in qualità di direttore vendite distributori regionali. Dopo circa un 
anno, “molto utile per capire a fondo il rapporto con l’utente finale e le 
problematiche di questo mercato così giovane”, il passo che più in questo 
momento ci interessa: la Sinclair Research. 

“Quando la Sinclair mi contattò per assumere la responsabilità della Sinclair 
Italia mi sembrò di sognare, perchè il mio obiettivo di gestire una società 
seria e professionale era finalmente raggiunto”, dice Garlaschelli, aggiun- 
gendo affermazioni estremamente positive sullo staff direttivo e tecnico 
inglese, a suo parere tra i migliori in senso assoluto. 

Parlando del prossimo futuro della Sinclair Italia, gli obiettivi di Garlaschelli 
sono, tra gli altri (oltre a quanto già riportato nell’articolo qui a fianco): 
l’organizzazione di club Sinclair espressamente dedicati al QL, nonché l’atti- 
vazione di rapporti di collaborazione con quelli già esistenti; la creazione 
di “una nuova generazione di programmi che ci consentano di affermare 
uno standard Sinclair anche nel software”, completi (come tutta la documen- 
tazione hardware) di manuali in italiano, e l’offerta agli utenti, in aggiunta 
a computer e programmi, di accessori e periferiche forse oggi poco utilizza- 
te, ma per le quali si prevede un interessante futuro: valga per tutti l’esem- 
pio dei modem o dei floppy disk drive. 

Garlaschelli termina con una promessa: “Nel mio lavoro ho sempre cercato 
di attenermi alla stessa regola: essere molto chiaro e franco. Intendo conti- 
nuare su questa strada”. 
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Logo e tartarughe 


di Tin Hartnell 

trad. e adatt. di Marcello Spero 


Ecco la seconda parte dell’Inter- 
prete Logo pubblicato sullo 
scorso numero di SUPERSINC 

I l Logo è un linguaggio grafico per com- 
puter, affascinante e semplice da usa- 
re. La scorsa volta abbiamo visto un pro- 
gramma BASIC che simulava sullo Spec- 
trum le più semplici istruzioni Logo. Ciò 
vi ha dato un certo controllo su di una 
specie di tartaruga elettronica, che pote- 
vate muovere sullo schermo facendole 
tracciare linee per creare semplici forme. 
In questa seconda parte della serie sul 
Logo, espanderemo il numero delle istru- 
zioni disponibili, trasformando il nostro 
programma in una versione del Logo po- 
tente e versatile. 

Date uno sguardo alla figura 1. La tabella 
vi dà una lista dei nuovi comandi Logo 
che saranno introdotti in questo articolo. 
Per rendere il programma visto la volta 
scorsa capace di accettare questi nuovi 
comandi, dovrete però aggiungergli le li- 
nee che trovate nel listato pubblicato. Ec- 
co il modo migliore di farlo. 


COMANDI IN FORMA 

FORMA 

ESTESA 

ABBREVIATA 

COLOREPENNA 

CP 

RITORNO 

WR 

NON RITORNO 

NW 

COPIA 


REGISTRA 


BASTA 


NUOVAX 

NX 

NUOVAY 

NY 

NUOVEXY 

XY 

DIREZIONE 


RIPETI 

RP 


Fig. 1 - I nuovi comandi logo 
introdotti in questa puntata 


Estendiamo il Logo 

Per prima cosa ricopiate nel vostro Spec- 
trum le linee di programma del listato. 
Quindi salvatele su cassetta. Caricate nel 
vostro Spectrum il programma della volta 
scorsa e sovrapponetegli, per mezzo di 
MERGE le nuove linee appena salvate. 
Questo può sembrare un modo complica- 
to di aggiungere le nuove linee, ma vi 
sarà utile nel caso dobbiate correggere 
degli errori di copiatura commessi nella 


seconda parte del programma. Se vi ac- 
corgete che il vostro programma espanso 
non funziona bene, ricontrollate tutta la 
seconda parte, che dovrà corrispondere 
esattamente al listato. Il programma com- 
pleto, come vi è già stato detto la scorsa 
volta, è adatto solo ad uno Spectrum 
48K, per cui, purtroppo, perderete il vo- 
stro tempo, se tenterete di copiare le li- 
nee di programma qui pubblicate in uno 
Spectrum 16K. 

Quando farete girare il programma otter- 
rete la solita indicazione, cioè una “W:” 
alla base dello schermo e la tartaruga al 
centro. Come senz’altro vi ricorderete, 
già la volta scorsa eravamo in grado di 
usare i comandi AVANTI, INDIETRO, 
SINISTRA e DESTRA per muovere la 
tartaruga, e PRONTI, CENTRO, PEN- 
NASU e PENNAGIU come istruzioni ag- 
giuntive di controllo. Diamo ora un’oc- 
chiata alle prime sei delle nuove istruzio- 
ni, che sono anche le più semplici. 

Finora tutti i nostri disegni sono stati rea- 
lizzati tracciando linee nere su di uno 
sfondo bianco. Il comando COLORE- 
PENNA (o CP) vi consente di cambiare 
in ogni momento il colore della traccia. 
Per completare questo comando dovete 
aggiungergli un numero da 0 a 7, a secon- 
da del codice del colore scelto. 
COLOREPENNA 1, ad esempio, cambie- 
rà in blu il colore della traccia per tutti i 
futuri movimenti della tartaruga. 

La volta scorsa è stato introdotto il con- 
cetto di “ritorno”. Con il ritorno, nel caso 
un’istruzione faccia uscire la tartaruga da 
un bordo sullo schermo, essa riapparirà 
dalla parte opposta, per continuare la 
sua strada. Questo procedimento può es- 
sere evitato con il comando NONRITOR- 
NO. Una volta che questo sia stato usato, 
se ordinerete alla tartaruga di uscire dallo 
schermo, otterrete un messaggio di erro- 


re. Per ristabilire il ritorno usate il coman- 
do RITORNO. 

Ancora istruzioni 

Le prossime tre istruzioni del primo grup- 
po sono molto semplici. COPIA produce 
una copia dello schermo sulla stampante. 
REGISTRA vi permette di salvare un pro- 
gramma (vedremo nella prossima punta- 
ta come creare un programma Logo) su 
cassetta. BASTA vi fa semplicemente 
uscire dal Logo, tornando al BASIC. 
Ricordatevi che tutti i comandi Logo pos- 
sono essere scritti per intero o nella loro 
forma abbreviata, se questa è disponibi- 
le. 

Il prossimo gruppo di istruzioni rappre- 
senta un nuovo modo di muovere la tarta- 
ruga. Come potete vedere nel relativo 
capitolo del vostro manuale, la grafica ad 
alta risoluzione dello Spectrum è compo- 
sta da 256x176 punti. Ognuno di essi può 
essere definito mediante una coppia di 
coordinate: il primo punto in basso a sini- 
stra ha coordinate 0,0, mentre l’ultimo in 
alto a destra 255,175. 

Se vi muovete verticalmente sullo scher- 
mo, vi muovete seguendo l’asse delle y; 
muovendovi invece orizzontalmente, se- 
guite quello delle x. 

Tutto questo può sembrare terribilmente 
matematico, ma vi sarà senz’altro più 
chiaro quando userete le nuove istruzioni 
per muovere la tartaruga. 

L’istruzione NUOVAX sposta la tartaru- 
ga lungo l’asse delle x (orizzontalmente) 
fino ad un punto specificato. Così, NUO- 
VAX 10 muoverà la tartaruga orizzontal- 
mente dalla posizione in cui era fino ad 
una posizione che si trova ad 11 punti 
(ricordate che il primo di essi ha il numero 
0) dall’estremo sinistro dello schermo. Al- 
lo stesso modo NUOVAY 10 sposterà la 
tartaruga verticalmente ad una posizione 
che si trova ad 11 punti dall’estremo infe- 





riore dello schermo, non comprendendo 
in questo le due linee destinate ai coman- 
di. Spostando la tartaruga con la penna 
giù, traccerete una linea. Provate ora 
questo esempio. Riportate tutto alle con- 
dizioni originali con l’istruzione PRONTI 
e quindi date il comando: 

NX 60 NY 140 NX 128 NY 88 
(terminato da ENTER) 

che traccerà linee orizzontali e verticali 
fino a creare un rettangolo. Il comando 
NUOVEXY sposta la tartaruga alle coor- 
dinate specificate dopo il comando, che 
deve perciò essere seguito da due nume- 
ri: il primo sarà la coordinata x, il secondo 
la coordinata y. Per esempio, dopo aver 
ottenuto il rettangolo per mezzo della 
routine qui sopra, date: 

NUOVEXY 60 140 (oppure XY 60 140) 
e premete ENTER 

Verrà tracciata una diagonale del rettan- 
golo e la tartaruga terminerà alle coordi- 
nate 60, 140, che si trovano in corrispon- 
denza dell’angolo superiore sinistro della 
figura geometrica. 

Provate per conto vostro NUOVAX, 
NUOVAY e NUOVEXY con vari valori, 
ricordando che la x dovrà essere compre- 
sa fra 0 e 255, mentre la y fra 0 e 175. 



Fig. 2 - Come orientare la tarta- 
ruga usando il comando 
Direzionale 


La direzione 

Avrete probabilmente notato che usando 
queste istruzioni la direzione della tarta- 
ruga (cioè il suo orientamento) rimane il 
medesimo che essa aveva prima dell’ese- 
cuzione dell’istruzione stessa. Per dare 
alla tartaruga un determinato orienta- 
mento esiste una nuova istruzione, DIRE- 


ZIONE. La figura 2 vi mostra l’orienta- 
mento assunto dalla tartaruga in seguito 
ad un determinato comando DIREZIO- 
NE. DIREZIONE 0 orienterà la tartaruga 
verticalmente verso l’alto; DIREZIONE 
270 la farà invece puntare orizzontalmen- 
te verso la sinistra dello schermo. I valori 
dati dovranno sempre essere compresi 
fra 0 e 359. 

Se state facendo confusione fra il coman- 
do DIREZIONE ed i comandi DESTRA e 
SINISTRA, ricordate che mentre DIRE- 
ZIONE vi permette di orientare la tarta- 
ruga in modo assoluto, DESTRA e SINI- 
STRA la ruotano in modo relativo al suo 
precedente orientamento. 

Ancora un briciolo di teoria prima di pas- 
sare a qualche esempio. Come vi ricorde- 
rete, la volta scorsa abbiamo creato un 
quadrato con le istruzioni: 

AA 40 DX 90 AA 40 DX 90 AA 40 DX 
90 AA 40 DX 90 

Vi sarete resi conto che i due comandi 
AA 40 DX 90 sono ripetuti quattro volte. 
Esiste, in Logo, un comando che può aiu- 
tare nelle ripetizioni. Ovviamente, il suo 
nome è RIPETI (RP abbreviato). Ecco co- 
me viene usato per disegnare il quadrato. 
Pulite lo schermo con il comando PRON- 
TI e quindi scrivete: 

RP 4 [AA 40 DX 90] 
e premete ENTER. 

Il numero che segue RIPETI (o RP) indica 
quante volte andranno ripetuti i comandi 
racchiusi nelle parentesi quadre. Ricorda- 
tevi di lasciare sempre uno spazio fra co- 
mandi, numeri e parentesi quadre. Per 
essere completo, il comando RIPETI de- 
ve sempre essere seguito da un numero 
e da una parentesi quadra aperta. Una 
parentesi quadra chiusa indica invece la 
fine del ciclo di ripetizione. 

Cicli nidificati 

Come per i cicli FOR-NEXT in BASIC, 

RP 12 [DX 30 RP 8 [DX 45 A A 20]] 

Fig. 3 - La modificazione dei cicli 
in logo 

anche i cicli RIPETI possono essere nidifi- 
cati. Come esempio, l’istruzione Logo ri- 
portata in figura 3 produrrà il disegno 
simmetrico di figura 4. 

I due cicli sono evidenziati dalle linee trac- 
ciate al di sopra dell’istruzione. La nidifi- 
cazione dei cicli è più semplice in Logo 



Fig. 4 - Output grafico deiristru- 
zione grafica riportata su fig. 3 

che in BASIC e, a patto che le parentesi 
aperte siano tante quante quelle chiuse, 
non potrete sbagliare. Il comando appena 
visto può essere variato in maniera molto 
semplice, così da produrre un’ampia va- 
rietà di disegni geometrici. Osservando il 
comando vi accorgerete che sono stati 
unite insieme (con linee al di sotto del 
comando) due coppie di numeri. Moltipli- 
cando fra loro i primi due otterrete 360, 
e così pure per i secondi. Questo è il 
trucco per ottenere disegni simmetrici. 
Potete sostituire i numeri con qualsiasi 
altra coppia, purché le moltiplicazioni 
continuino a dare 360. Facciamo qualche 
esperimento e vediamo cosa viene fuori. 
Ecco altre tre routine per ottenere delle 
figure: 

1. PRONTI DX 20 

RP 5 [A A 40 DX 135 A A 40 SX 63] 

2. PRONTI PS XY 80 60 PG 

RP 8 [AA 40 DX 45] DX 45 

RP 8 [AA 96 DX 135] 

3. PRONTI CP 1 RP 3 [AA 40 DX 120] 
CP 2 RP 3 [II 40 SX 60] 

SX 90 CP 3 RP 3 [A A 40 DX 120] 
CP 4 RP 3 [II 40 SX 60] 

Provatele una alla volta, dando ENTER 
alla fine di ognuna, osservate cosa succe- 
de sullo schermo e ponetelo in relazione 
con ciò che avete appena introdotto. Vi 
accorgerete di quanto rapidamente giun- 
gerete a comprendere i comandi Logo 
visti finora. 

Fin qui abbiamo semplicemente dato al 
computer dei comandi, che sono stati ese- 
guiti immediatamente e quindi dimentica- 
ti. Ben più utile sarebbe che il computer 
conservasse le istruzioni, per consentirci 
di riutilizzarle quando vogliamo. Il nostro 
interprete Logo opererà allora su di un 
programma Logo. I lettori più attenti si 
saranno accorti che il programma BASIC 
di questa puntata contiene già le routine 
di comandi per la creazione e la modifica 
(DEFINISCO e CORREGGO). Purtroppo 
lo spazio ci obbliga a rimandare alla pros- 
sima puntata la trattazione di questi argo- 
menti, insieme con la parte finale dell’in- 
terprete Logo. 


Logo 2 

versione per ZX Spectrum 48K 

65 DIM x$ (m , 2) : DIM w$(n+40,12): 
DIM f$ (o,12) 

110 DATA 16,22,1 


125 DATA "RP" , 41 00 , "CP" , 4300 , "RT" , 44 
00, "NR", 4600 

130 DATA "NX" ,4600, "NY" ,4630, "XY" ,46 
60, "DI", 4700 

135 DATA "DF" ,5000, "CO" ,5200 

215 DATA "RIPETI", 4100,"] ",4200, "COL 
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OREPENNA" , 4300, "RITORNO" ,4400, "N 
ONRITORNO" ,4450 

220 DATA "REGISTRA" ,4500, "COPIA" ,452 
0,"BASTA" ,4550 

225 DATA "NUOVAX" , 4600 , "NUOVAY" , 4630 
,"NUOVEXY" ,4660, "DIREZIONE" ,4700 

230 DATA "DEFINISCO" ,5000, "CORREGGO" 
,5200 

450 DIM r (20, 2) 

465 LET def = 0 : DIM k$(40,200): DIM 1 
(40) 

470 DIM b$ ( 1 0 , 28) : DIM c(10): DIM m( 
40) : DIM n (40) 

600 REM Use a defined command 
730 LET a$="Troppi RIPETI nella line 
a": RETURN 

740 LET a$="Il nome e' sbagliato": 
RETURN 

750 LET a$="Non c'e' posto per altri 
comandi": RETURN 

760 LET a$="Il nome del comando e' s 
bagliato": RETURN 
2140 FOR i=l TO n+def 
2210 IF i<=n THEN GO SUB v(i): 

GO TO 2220 
221 5 GO SUB 6000 
4100 REM RIPETI 
4105 REM 

4110 GO SUB 1200: IF err>0 THEN 
RETURN 

4115 LET s = s+l : IF s>LEN z$ THEN 
LET err=l : RETURN 

4120 IF z$(s)=" " THEN GO TO 4115 
4125 IF z$(s)="[" THEN GO TO 4135 
4130 LET err=l : RETURN 
4135 LET rc=rc+l : LET s=s+l 
4140 IF rc>20 THEN LET err=4: 

RETURN 

4145 LET r (re , 1 ) =s : LET r(rc,2)=a 
41 50 RETURN 
41 55 REM 

4200 REM ] - Ciclo RIPETI 
4205 REM 

4210 LET r (re, 2) =r (re, 2) -1 
4215 IF r (re , 2) >0 THEN LET s=r(rc,l) 
: RETURN 

4220 LET rc=rc-l: RETURN 
4300 REM COLOREPENNA 
4305 REM 

4310 GO SUB 1200: IF err>0 THEN 
RETURN 

4315 IF a>7 THEN LET err=2: RETURN 
4320 INK a: RETURN 
4325 REM 

4400 REM RITORNO 
4405 REM 

4410 LET wr=l : RETURN 
441 5 REM 

4450 REM NONRITORNO 
4455 REM 

4460 LET wr=0 : RETURN 
4465 REM 

4500 REM REGISTRA 

4505 INPUT "REGISTRA - Nome del file? 
" ; n$ 



4510 SAVE n$ LINE 2000: RETURN 
451 5 REM 

4520 REM COPIA 
4525 COPY : RETURN 
4530 REM 

4550 REM BASTA 
4555 CLS : STOP 
4600 REM NUOVAX 
4605 GO SUB 1200: IF err>0 THEN 
RETURN 

4610 IF tar t=0 THEN LET tart=l : 

GO SUB 1 1 00 

4615 IF a< 0 OR a>255 THEN LET err = 2: 
RETURN 

4620 LET y2=y : LET tr=0: LET yl=0: 

LET xl =a-x: LET x2=a: GO TO 312 

0 

4625 REM 

4630 REM NUOVAY 
4635 GO SUB 1200: IF err<0 THEN 
RETURN 

4640 IF tar t=0 THEN LET tart=l : 

GO SUB 1 1 00 

4645 IF a< 0 OR a>l 75 THEN LET err = 2: 
RETURN 

4650 LET x2=x: LET tr=0: LET xl=0: 

LET yl=a-y: LET y2=a: GO TO 312 

0 

4655 REM 

4660 REM NUOVEXY 

4665 IF tar t=0 THEN LET tart=l : 

. GO SUB 1 1 00 

4670 GO SUB 1200: IF err>0 THEN 
RETURN 

4675 IF a<0 OR a>255 THEN LET err=2: 
RETURN 

4680 LET xl =a-x: LET x2=a: GO SUB 120 
0: IF err >0 THEN RETURN 
4685 IF a<0 OR a>l 75 THEN LET err=2: 
RETURN 

4690 LET tr=0: LET yl=a-y: LET y2=a: 

GO TO 31 20 
4695 REM 

4700 REM DIREZIONE 
4705 GO SUB 1200: IF err>0 THEN 
RETURN 

4710 IF a<0 OR a>359 THEN LET err=2: 
RETURN 

4712 IF tar t=0 THEN LET tart=l : 

GO SUB 1 1 00 

4715 LET dir=a : RETURN 
5000 REM DEFINISCO 

5005 GO SUB 1020: IF tl=l AND LEN y$< 
2 THEN LET err=5: RETURN 
5010 IF LEN y$<>2 THEN GO TO 5025 
5015 FOR i=l TO m: IF y$=x$(i) THEN 
LET err =5: RETURN 
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5020 NEXT i 

5025 LET y$=(y$+" ") ( 

TO 1 2) 

5030 FOR i=l TO def+n: IF y$=w$(i) 
THEN LET err=5: RETURN 
5035 NEXT i: IF def>39 THEN LET err = 
6: RETURN 

5040 CLS : PRINT "DEFINISCO ,, ;y$'' 
5050 LET def=def+l : LET no=0 
5055 INPUT "W:"; LINE z$ : IF LEN z$>2 
8 THEN PRINT #l;"Troppo lungo!" 
: PAUSE 200: GO TO 5055 
5060 IF LEN z$<2 THEN PRINT #1;"Non 
ha senso!": PAUSE 200: GO TO 505 
5 

5065 PRINT no ; TAB 3 ; z$ ' ' : LET no=no+l 
: LET len=LEN z$ 

50 70 IF * len< 4 THEN GO TO 50 85 
5075 FOR i=l TO len-3: IF z$(i TO i+3 
) ="FINE" THEN GO TO 5095 
5080 NEXT i 

5085 IF no< 1 1 THEN LET b$(no)=z$: 

LET c (no) =len : GO TO 5055 
5090 PRINT #l;"Non c'e' piu' spazio p 
er " ; y$ : PAUSE 200: GO TO 5100 
5095 LET len=len-4 : LET b$(no)=z$( 

TO len): LET c(no)=len: IF no<l 
0 THEN LET c(no+l)=0 
5100 LET w$ (n+def ) =y$ : LET c$="": 

LET no= 1 : LET len=0 
5105 IF c (no) =0 THEN GO TO 5120 
5110 LET c$=c$+b$ (no, TO c(no))+ 

CHR$ 0: LET len= len+c (no ) +1 
5115 LET no=no+1 : IF no<10 THEN 
GO TO 5105 

5120 LET k$ (def ) =c$ : LET l(def)=len 
5125 CLS : PRINT "HO IMPARATO " ; y$ 
5130 PAUSE 200: CLS : RETURN 
5200 REM CORREGGO 

5205 GO SUB 1020: IF t 1 =1 AND LEN y$< 
2 THEN LET err=7: RETURN 
5210 LET y$=(y$+" ")( TO 1 

2 ) 

5215 IF def =0 THEN LET err=7: 

RETURN 

5220 FOR i=n+l TO n+def: IF y$=w$(i) 
THEN GO TO 5230 
5225 NEXT i: LET err=4: RETURN 
5230 GO SUB 5800 
5240 GO SUB 5950 

5250 PRINT #1 ;"1 : CORREGGE 7 : AGGI UNGE 
3:TOGLIE4:ELIMINA 5 : RI TORNA" 

5255 LET z$=INKEY$: IF z$="" THEN 
GO TO 5255 

5260 IF z$<"l" OR z$>"5" THEN 
GO TO 5255 

5265 LET z=VAL z$ : GO TO 5200 + 1 00*.z 


5275 

5300 

5305 

531 0 

531 5 
5320 


5325 

5330 

5400 


5405 

541 0 

541 5 

5420 

5425 


5430 

5435 

5440 

5445 


5450 

5500 


5505 
551 0 

551 5 

5520 

5525 

5530 

5535 

5540 

5600 

5605 
561 0 

5620 

5625 

5630 

5635 

5640 
5700 
5705 
571 0 

5715 

5720 

5725 


GO TO 5235 

GO SUB 5950: PRINT #l;"Nuova lin 
ea?" 

LET z$=INKEY$: IF z$="" THEN 
GO TO 5305 

IF z$<"0" OR z$>"9" THEN 
GO TO 5305 
LET lin=VAL z$ 

INPUT (lin);" W:"; LINE z$: IF 
LEN z$>28 THEN PRINT #1; "Troppo 
lunga": PAUSE 200: GO TO 5320 
LET b$ (lin+1 ) =z$ : LET c(lin+l)= 
LEN z$ 

GO TO 5235 

IF k>9 THEN PRINT #l;"Non c'e' 
posto per questa linea": PAUSE 2 
00: RETURN 

GO SUB 5950 : PRINT #1 ; "NUmero de 
Ila linea?" 

LET z$=INKEY$ : IF z$="" THEN 
GO TO 541 0 

IF Z$<"0" AND z$>STR$ (k+1) 

THEN GO TO 5410 
LET ins=VAL z$ 

INPUT (ins);" W:"; LINE z$: IF 
LEN z$>28 THEN PRINT #1; "Troppo 
lunga": PAUSE 200: GO TO 5425 
LET ins=ins+l 
FOR i=k TO ins STEP -1 
LET b$ ( i+1 ) =b$ ( i ) : LET c(i+l)=c( 
i ) : NEXT i 

LET b$(ins)=z$: LET c(ins)=LEN z 

$ 

LET k=k+l : GO TO 5235 
LET z$= "TOGLIERE ": GO SUB 5950: 
GO SUB 5900 

IF a$="N" THEN GO TO 5235 
GO SUB 5950: PRINT # 1 ; z$ ; "Numero 
di linea?" 

LET z$=INKEY$ : IF z$="" THEN 
GO TO 551 5 

IF z$<"0" OR z$>STR$ (k-1) 

THEN GO TO 591 5 
LET k=k- 1 

FOR i= 1 +VAL Z$ TO k 

LET b$ (i) =b$ (i+1 ) : LET c(i)=c(i+ 

1 ) : NEXT i 

GO TO 5235 

LET z$= "ELIMINARE ": GO SUB 5950 
: GO SUB 5900 

IF a$="N" THEN GO TO 5235 

LET def =def- 1 : IF def=0 OR ed=de 

f+1 THEN CLS : RETURN 

FOR i=n+ed TO def+n 

LET w$ (i) =w$ (i+1 ) : NEXT i 

FOR i=ed TO def 

LET k$ (i) =k$ (i+1 ) : LET l(i)=l(i+ 

1 ) : NEXT i 

CLS : RETURN 

LET c$="": LET no=0 

FOR i=l TO k 

LET c$=c$+b$(i, TO c ( i ) ) +CHR$ 0: 

LET no=no+c(i)+l 
NEXT i 

LET k$ (ed) =c$ : LET l(ed)=no 
CLS : PRINT y$;" E' STATO CORRET 
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5730 

5800 

5805 

581 0 

581 5 

5820 

5825 

5830 

5900 

5905 

591 0 

591 5 

5950 

5955 

5960 

5965 

6000 

6005 

6010 

601 5 

6020 

6025 

6030 

6035 

6040 

6045 

6050 


TO": PAUSE 200 
CLS : RETURN 

LET ed=i-n: CLS : PRINT "CORREGG 
ERE " ; y$ 1 ' "Un attimo prego" 

LET len=l : LET k = 0: LET z$=k$(ed 
, TO 1 (ed) ) 

IF len>l (ed) THEN RETURN 

LET c$ = "" : LET no=0: LET k=k+l 

IF z$ (len) <>CHR$ 0 THEN LET C 

$=c$+z$ (len) : LET no=no+l : LET 1 

en=len+l : GO TO 5820 

LET len=len+l : LET b$(k)=c$: 

LET c(k)=no: GO TO 5810 
RETURN 

PRINT #1 ; z$ ; E' confermato? (S 
/N)" 


LET 

a$ = 

INKEY$ : 

IF 

a$ = " " 

THEN 

GO 

TO 

5905 




IF 

NOT 

(a$="S" 

OR 

a$ = "N 

" ) THEN 

GO 

TO 

5905 





RETURN 

CLS : PRINT "CORREZIONE di " ; y$ ' 

I 

FOR i=l TO k 

PRINT i- 1 ;TAB 3;b$(i)": NEXT i 
RETURN 

REM uso di un comando 
creato dall ' utilizzatore 
IF cont=0 THEN LET p$=z$: LET s 
l=s 

IF cont>0 THEN LET m(cont) =comm 

: LET n(cont)=s 

LET comm=i-n: LET z$=k$(comm, 

TO 1 ( comm ) ) 

LET cont=cont+l 
LET s=0 : GO SUB 2040 
LET cont=cont-l 

IF cont>0 THEN LET comm=m(cont) 
: LET z$=k$(comm, TO l(comm)): 
LET s=n (cont) 

IF cont=0 THEN LET z$=p$: LET s 
= sl 

IF cont< 0 THEN LET err = l 
RETURN 
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Non esiste, in Tingua italiana, un libro di testo così. Chiaro, completo, 
moderno, ma anche rigoroso e didattico. Sono alcuni tra gli aggettivi 
che costituiscono la prerogativa di questo volume. Per capire 
l’elettronica digitale bisogna avere delle solide conoscenze sui dispositivi 
a semiconduttore, soprattutto usati in circuiti di commutazione. 

E malgrado quest’analisi richieda una notevole complessità matematica, 
introducendo alcune semplificazioni è possibile mantenere la trattazione 
ugualmente rigorosa e ottenere approssimazioni pienamente accettabili. 
Come trascurare poi gli amplificatori operazionali, che, se a rigore non 
rientrerebbero nella materia, però trovano larga applicazione in sistemi 
completamente digitali. E poi i circuiti integrati, finalmente spiegati e 
analizzati in tutti i loro aspetti. Dalla vecchia logica resistore-transistor 
(RTL), funzionale nella sua semplicità all'esemplificazione degli aspetti 
fondamentali, a quella a simmetria completamente (CMOS) 

Questo, però, dopo aver studiato un capitolo che, pur non richiedendo 
alcuna conoscenza preliminare, va a fondo dei concetti di variabile 
logiche, di algebra di Boole, di analisi di circuiti logici. E ancora. Via via 
nei vari capitoli: i flip-flop, i registri, e i contatori (sia sincroni che t 
asincroni), i circuiti logici atti ad eseguire operazioni matematiche, le 

memorie a semiconduttore (RAM, ROM, EPROM ), l’interfacciamento 

tra segnali analogici e digitali (multiplexer, circuiti sample and hold, .... 
convertitori d/a e a/d), i temporizzatori. Tutto con oltre 400 problemi, dai 
più semplici ai più sofisticati, in cui vengono presentati i circuiti tipici 
che si trovano nella pratica. 

Un testo quindi non solo per gli specialisti e per gli studenti universitari, 
ma che si adatta magnificamente agli Istituti Tecnici. 

Un testo che, speriamo per gli studenti, la scuola non debba scoprire tra 
alcuni anni. 
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Piccola guida per 
l’input 

dei programmi 


I programmi pubblicati da SUPERSINC sono stati ac- 
curatamente provati e verificati in questo modo spe- 
riamo di avere ridotto al minimo la possibilità di errori. 
Nel caso comunque un programma dovesse presentare 
malfunzionamenti, pubblicheremo le modifiche da ap- 
prontare in uno dei numeri immediatamente successivi 
della rivista. 

Per utilizzare i programmi pubblicati è sufficiente digi- 
tare i relativi listati sulla tastiera del calcolatore. 

Nel caso dello ZX SPECTRUM, abbiamo previsto una 
semplice decodifica dei tasti da digitare nel modo grafi- 
co, per semplificare la comprensione dei listati. 

Come è noto, lo SPECTRUM è provvisto di 2 serie di 
tasti grafici: una prima serie di 16 caratteri grafici pre- 
definiti (i tasti numerici da 1 a 8 e gli stessi “shiftati”) 
e una serie di caratteri definibili dall’utente nell’ambito 
di un programma (le lettere da A a U). 

In entrambi i casi, per ottenere i caratteri desiderati 
occorre entrare in modo grafico (cursore contrassegna- 
to dalla lettera G lampeggiante) premendo contempo- 
raneamente i tasti CAPS-SHIFT e 9. 

Nei nostri listati i caratteri grafici predefiniti sono indi- 
cati da una Q seguita dal numero corrispondente al 
testo che occorre digitare, il tutto racchiuso tra due 
parentesi graffe. 


Ad esempio {G4} significa che occorre digitare il tasto 
4, con il cursore in modo grafico. 

Analogamente la codifica SG, seguita da un numero 
da 1 a 8, significa che occorre digitare il relativo tasto 
numerico premendo contemporaneamente il tasto 
CAPS-SHIFT. 

Ad esempio quando si trova la codifica |G2(, occorre 
premere il tasto 2 contemporaneamente al tasto CAPS- 
SHIFT, ovviamente con il cursore in modo grafico. In 
entrambi i casi precedenti, quando un simbolo grafico 
deve essere digitato più volte, i caratteri G o SG della 
codifica sono preceduti da un numero che specifica 
quante volte va premuto il tasto grafico indicato. 

Così ad esempio { 8G5 j significa che il tasto grafico 5 
va digitato 8 volte e analogamente {4SG1 } indica che 
il tasto grafico 1 e CAPS-SHIFT devono essere battuti 
4 volte. 

I caratteri grafici definibili (le lettere da A a U in modo 
grafico) hanno una codifica semplificata: la lettera cor- 
rispondente, sottolineata. 

Quando in un listato viene presentata, ad esempio, una 
A sottolineata, occorre entrare in modo grafico (al soli- 
to premendo contemporaneamente i tasti CAPS- 
SHIFT e 9) e quindi digitare semplicemente il tasto 
che contrassegna la lettera A. 


Quando leggete || Premete 

Vedrete 


Quando leggete )| Premete 

Vedrete 


{Gl} 


FTP 

{G2 } 


b PI 

{ G 3 } 


EH 

{ G 4 } 


b . 

{ G 5 } 


b II 

{G6 } 

{ G 7 } 


08 

e a 

{G8 } 


1 8 1 1 

{ SG1 } 


1 CAPS 


1 SHlfl 1 

{SG2} 

Se non siete 
giè in modo 

G, entrateci 
schiacciando 
contempora- 

1 CAPS 

1 SHIFT 

{ SG3 } 

f CAPS 

1 SHIFT 

{SG4 } 

neamente 
CAPS SHIFT 
e 9 

1 CAPS 

Lm n. 1 

{ SG5 } 

| CAPS 1 


L SHIFT 1 

{ SG6 } 


I CAPS | 

1 SHIFT 1 

{ SG7 } 


I CAPS 

l SHIFT 

{SG8 } 


[ CAPS 

l 


□3 

EH 

l 3 H 

oa 

d 

08 

Eia 

ou 



■ 

i 

% 



i 

* 


Se dovete 
uscire dai 
modo G, 
schiacciate 9 


A 

B 

C 

D 

E 

F 

G 

H 

I 

J 

E 

L 

M 

N 

O 

P 


Q 

R 

S 

T 

U 


Se non siete 
giè in modo 
G, entrateci 
schiacciando 
contempora- 
neamente 
CAPS SHIFT 
e 9 


A 


B 


C 


D 


E 


F 


G 


H 


I 


J 


K 


L 


M 


N 


O 


P 


Q 


R 


S 


T 


u 


Simbolo grafico 
definito nel 
programma in uso. 


Se dovete 
uscire dal 
modo G, 
schiacciate 9 
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terza parte 
di Marcello Spero 



Come realizzare un’interfaccia 
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fig. 1 

Schema del connettore interfac- 
cia-Spectrum. Lato saldature. 
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1 1111111 


u 


U! 


Una volta costruita un’interfac- 
cia, che uso farne? 

C i siamo! Eccoci arrivati al momento 
del controllo di tutto il lavoro fatto. 
Finalmente, se avete fatto le cose nel mo- 
do giusto, potrete vedere la vostra inter- 
faccia all’opera. Addirittura ne vedremo 
già una prima applicazione, che, sebbene 
non sia particolarmente sofisticata, non 
mancherà di interessarvi. Con l’aggiunta 
di un semplice convertitore, composto 
unicamente da resistenze, otterremo in- 
fatti un’interfaccia per joystick conforme 
allo standard Kempston. 

Collaudo dell'Interfaccia 

Vediamo comunque le cose dal principio, 
e cioè il collaudo della nostra interfac- 
cia. 

Se avete eseguito tutte le operazioni de- 
scritte nella scorsa puntata, dovreste 
aver completato il montaggio del circuito. 
Ci auguriamo comunque che a nessuno 
sia venuto in mente di provare a collegare 
l’interfaccia allo Spectrum prima di aver- 
la adeguatamente collaudata, cosa che 
stiamo per fare. 

Prendiamo dunque il nostro circuito e 
togliamogli tutti gli integrati che avessimo 
eventualmente già inserito nei loro zocco- 
li (meglio, comunque, non averlo fatto: 
vedremo insieme come compiere questa 
operazione nel miglior modo possibile). 
Quindi applichiamo sul lato del connetto- 
re delle etichette indicanti la posizione dei 
vari contatti che ci interessano. A questo 
proposito, per coloro che avessero avuto 
problemi nel trovare l’esatta posizione 
delle varie linee sul connettore, la figura 
1 riproduce la vista del circuito dal lato 
delle saldature, con indicati i vari collega- 
menti con il connettore stesso, mentre la 
figura 2 dà una vista frontale del connet- 
tore con le stesse indicazioni. 

Ora ricontrolliamo, aiutandoci con gli 
specchietti pubblicati la volta scorsa, 


fig. 2 Schema del connettore 
interfaccia-Spectrum. Lato an- 
teriore. 

l’esattezza dei collegamenti. Per questo 
ci serviremo di un tester, che può comun- 
que essere sostituito dal congegno che 
vedete in figura 3, formato da una batte- 
ria ed una lampadina. Richiamiamo in 
particolare la vostra attenzione sul con- 
trollo delle linee di alimentazione: colle- 
gando un terminale del tester al morsetto 
del positivo (raccomandiamo di contras- 
segnare in qualche modo i due morsetti, 
così da poterli sempre distinguere a colpo 
d’occhio; noi abbiamo colorato in nero 
quello del negativo), verificate che vi sia 
collegamento fra questo e il piedino corri- 
spondente (cioè quello del positivo di ali- 
mentazione) di ciascun zoccolo, e solo con 
questo. Ripetete quindi l’operazione con 
il negativo. A questo proposito ricordia- 
mo che solo il negativo dell’alimentazione 
va collegato con il contatto corrisponden- 
te del connettore; il positivo non va inve- 
ce assolutamente collegato ai +5V dello 
Spectrum, onde realizzare quell’isola- 
mento elettrico che può garantire una 
certa sicurezza in caso di cortocircuiti ac- 
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fig. 3 Schema dell’apparecchio 
sostitutivo del tester. 

cidentali. 

Ed eccoci al momento di inserire gli inte- 
grati nei loro zoccoli. Prima di eseguire 
questa operazione è bene spuntarne i pie- 
dini, con forbici o tenaglie, di un paio di 
millimetri (non di più, attenti...), per facili- 
tare il loro inserimento. Se avrete esegui- 
to i collegamenti in modo che il contatto 
indicato come 1 sullo zoccolo corrisponda 
realmente al piedino 1 (vi ricordate il 
trucco del segno con il pennarello?), non 
dovreste avere problemi. 
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REM:HW 


Inserite gli integrati uno ad uno, premen- 
do bene, in modo che si inseriscano a 
fondo, cioè fino ad appoggiare con la 
“pancia” sullo zoccolo. Diffidate degli in- 
serimenti troppo morbidi: c’è senz’altro 
qualcosa che non va; eventualmente pie- 
gate in modo opportuno i contatti dello 
zoccolo, servendovi di un piccolo caccia- 
vite, per rendere più sicuro il bloccag- 
gio. 

Fatto questo si passa al primo collaudo 
in tensione. Collegate i morsetti di alimen- 
tazione alle rispettive uscite dell’alimen- 
tatore ed inserite la spina. Tenendovi 
pronti a staccarla, tastate ora con il dorso 
di un dito i vari integrati, per la consueta 
“prova calore”. Questa volta, comunque, 
mentre per il 74LS27 il responso deve 
essere gelido, per gli altri è normale un 
leggero intiepidimento, ben distinguibile, 
in ogni caso, dall’arroventamentro che in- 
dica un’inversione di polarità nell’alimen- 
tazione. Se questo dovesse capitare, via 
la spina e ricontrollate i collegamenti. 
Superata anche questa prova, ci sono ot- 
time probabilità che sia tutto in ordine, e 
gli amanti del rischio potrebbero anche 
tentare già il collegamento con lo Spec- 
trum. I più prudenti, invece, si rassegnino 
ad un ultimo collaudo complessivo, che li 
garantirà contro brutti (e costosi...) scher- 
zi. 

Per attuare quest’ultima prova dobbiamo 
innanzitutto fare in modo che sia l’inter- 
faccia che il monitor-sonda possano esse- 
re alimentati contemporaneamente. 
Quindi, per mezzo di un morsetto, o più 
semplicemente di una serie di saldature, 
dovremo disporre di quattro fili piuttosto 
lunghi collegati al negativo dell’alimenta- 
zione. Occorre inoltre che uno degli in- 
gressi del monitor-sonda sia collegato ad 
un lungo filo, come avevamo già detto. 
Diamo ora tensione a tutto il complesso. 
Ovviamente tutti i LED si illumineranno, 
venendo considerati a livello alto gli in- 
gressi non collegati. Portate tre dei quat- 
tro fili collegati a massa a contatto, sul 
connettore, con i terminali IORQ, RD, 
e A7. I fili dovrebbero incastrarsi piutto- 
sto bene fra la linguetta dorata del con- 
tatto e la plastica del bordo del connet- 
tore. Se necessario, fatevi aiutare a 
mantenerli in posizione. 

Andate adesso a toccare con il filo del 
monitor-sonda i terminali DO... D7, sem- 
pre del connettore: dovranno risultare 
tutti a livello alto (il LED resta acceso). 
Fissate quindi questo filo a DO; prende- 
te l’ultimo rimasto dei fili collegati a 
massa e portatelo a toccare il terminale 
(contrassegnato con 0 nello schema) 
che fa capo al primo ingresso del 
74LS244, cioè INO. Nel momento in cui 
avviene il contatto il LED dovrà spe- 
gnersi, ad indicare un livello basso. Se 


bit 

direzione 

7 

non utilizzato 

6 

non utilizzato 

5 

non utilizzato 

4 

pulsanti 

3 

Nord (avanti) 

2 

Sud (indietro) 

1 

Est (destra) 

0 

Ovest (sinistra) 


fig. 4 

Schema dei collegamenti per lo 
standard Kempston. 


ciò non avviene, ed avete il dubbio di 
aver sbagliato ingresso, provate a toc- 
care tutti e sette i terminali, finché suc- 
cede qualcosa. Può anche accadere 
che, per un errore di collegamento, non 
sia INO, ma un altro ingresso ad influen- 
zare DO; in questo caso ricontrollate il 
montaggio. 

Superato positivamente questo stadio 
possiamo essere certi che la sezione di 
ingresso è a posto. Passiamo perciò a 
quella di uscita. 

Stacchiamo il filo collegato con il termi- 
nale RD, lasciando invece al loro posto 
gli altri due. Togliamo anche il filo colle- 
gato al monitor-sonda. Con esso esami- 
niamo uno per uno i terminali OUTO.- 
..OUT7, cioè quelli facenti capo alle 
uscite del 74LS273 (o 374): alcuni sa- 
ranno a livello alto, altri a livello basso, 
in maniera casuale. Ora tocchiamo con 
uno dei fili collegati a massa rimasti libe- 
ri il contatto WR del connettore; non è 
necessario fissarlo,, basta un contatto 
momentaneo. Ripetiamo quindi l’esame 
dei terminali OUT, che dovranno essere 
tutti a livello alto. 

Proviamo a desso a ripetere il breve 
contatto con WR, tenendo contempora- 
nemante l’altro filo a massa a contatto 
con DO, sempre del connettore. L’esa- 
me dei terminali OUT dovrebbe darci 
a questo punto un livello basso per 
OUTO ed uno alto per gli altri. Notate 
come non è importante che DO rimanga 
stabilmente collegato con il filo: basta 
che lo sia mentre avviene il contatto con 
WR. Questo perché è solo al momento 
del passaggio da livello basso a livello 
alto di OKOUT che le informazioni ven- 
gono lette dal controllore di uscita, che 
le conserva memorizzate. 

Anche qui vale quanto detto per lo stadio 
di ingresso, ossia che per un errore di 
collegamento potrebbe essere un altro 
terminale a trovarsi a livello basso; in tal 
caso rivedete i collegamenti. 


Completamento e collegamento 
del monitor 

Ora che ci siamo accertati del corretto 
funzionamento di tutta l’interfaccia, po- 
tremmo collegarla al nostro Spectrum. 
Prima, però, è il caso di terminare i colle- 
gamenti del monitor-sonda, per poterlo 
collegare allo stadio di uscita. Per questo 
utilizzeremo un connettore che sia adatto 
ad inserirsi in quello già montato sull’in- 
terfaccia e che porta le otto linee OUT 
più il positivo ed il negativo di alimenta- 
zione. 

Collegate perciò ciascuna delle otto en- 
trate (ciascuna, ricordate, formata dalla 
coppia di ingressi di una porta logica) del 
monitor con uno dei contatti del connetto- 
re. L’ideale sarebbe di andare in ordine, 
ottenendo il collegamento della porta che 
pilota il LED più a destra con la linea 
OUTO, e così via fino ad arrivare a quella 
che pilota il LED più a sinistra, che sarà 
collegata con OUT7. 

Non dimenticate di collegare i due poli 
dell’alimentazione, stando attenti a non 
invertirli. Può sembrare inutile ripetere 
questi avvertimenti, ma nel collegamento 
di due connettori è facile sbagliare, poi- 
ché i contatti dell’uno devono essere l’im- 
magine speculare di quelli dell’altro. Per 
sicurezza contrassegnate con il pennarel- 
lo i due connettori in corrispondenza del 
contatto di massa: vi accorgerete subito 
se per caso non dovessero corrisponde- 
re. 

Anche il connettore più debole dovrebbe 
essere in grado di sostenere la basetta su 
cui è montato il monitor, per cui verrete 
ad ottenere una struttura simile a quella 
che vedete nelle foto. 

Colleghiamo l'interfaccia 

Con estrema delicatezza inseriamo ora la 
nostra interfaccia al connettore di espan- 
sione sul retro dello Spectrum. L’inseri- 
mento deve essere effettuato a fondo, ed 
in ogni caso la basetta dell’interfaccia do- 
vrà risultare parallela all’involucro della 
macchina. 

Diamo quindi corrente all’interfaccia. E 
importante che questa venga accesa pri- 
ma del calcolatore e spenta dopo. Il pro- 
cedimento inverso, infatti, provochereb- 
be una caduta del sistema al momento 
dell’accensione o spegnimento dell’inter- 
faccia. 

Infine, incrociando le dita, accendiamo lo 
Spectrum. E consigliabile che il televisore 
sia già caldo, in modo da rendere imme- 
diatamtente visibili eventuali anomalie. In 
questo caso la parola d’ordine è spegnere 
il calcolatore il più rapidamente possibile 
e ricontrollare tutto, ma proprio tutto. Se 
avete effettuato tutti i controlli nel modo 
descritto, è comunque piuttosto difficile 
che si presenti una situazione di questo 
genere. 

Funzione davvero? 

Ecco che la nostra interfaccia è inserita 
e funzionante. Ma come utilizzarla? Sia i 
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terminali di ingresso che quelli di uscita, 
infatti, sono “abbandonati a se stessi”, 
non essendoci alcun congegno esterno cui 
inviare o da cui ricevere informazioni. 
Per quanto riguarda l’input dobbiamo rin- 
viare una prova completa al momento in 
cui disporremo di una periferica da colle- 
gare. Questo momento è comunque mol- 
to prossimo, visto che già nel corso di 
questa puntata vi verranno date tutte le 
informazioni necessarie alla realizzazione 
di un collegamento standard per joy- 
stick. 

La sezione di output può invece essere 
provata immediatamente, grazie alla pre- 
senza del monitor, che visualizza lo stato 
dei signoli bit in uscita. 

Se questo è correttamente collegato al- 
l’interfaccia, sia dal punto di vista del se- 
gnale sia da quello dell’alimentazione, 
non appena data tensione avrete notato 
una sequenza di LED accesi e spenti, che 
riflettono lo stato casuale in cui si trova 
la memoria del controllore di uscita quan- 
do viene acceso. Provate adesso a dare 

OUT 223,0 

e tutti i LED si spegneranno. 

Il comando 

OUT 223,255 

viceversa, provoca l’accensione di tutti e 
otto i LED. 

Un effetto più elaborato lo si ottiene con 
il programmino 

10 FOR i=0 TO 7 
20 OUT 223,2- i 
30 PAUSE 10 
40 NEXT i 
50 GO TO 10 

che produce l’accensione in rapida se- 
quenza di un LED per volta. 

Lasciando a voi la spiegazione di questi 
effetti (chi non fosse ferrato in matemati- 
ca ci scriva...), aggiungiamo solo che 223 
non è l’unico indirizzo valido per pilotare 
la nostra interfaccia, ma lo sono ugual- 
mente tutti quelli che hanno i bit da 0 a 
4 di valore 1 ed il bit 5 (che seleziona 
appunto l’interfaccia) ha valore 0. Avere 
a 0 uno o più bit fra i primi quattro signifi- 
cherebbe chiamare in causa anche altri 
congegni (altoparlante, spinotti per il regi- 
stratore, stampante, microdrive, ecc.), 
creando una notevole confusione. D’altra 
parte, lo stato dei bit 6 e 7, nonché di 
quelli da 8 a 15, non ha alcuna importan- 
za. 31 (BIN 0000 0000 0001 1111) o 
65503 (BIN 1111 1111 1101 1111) van- 
no benissimo, ad esempio. 

Ai più polemici, che si staranno già chie- 
dendo se tutta la fatica spesa per costrui- 
re questo aggeggio sarà ricompensata 
con qualche lucetta colorata, chiediamo 
di pazientare un momento: avranno mo- 
do di constatare, già dalla prossima pun- 
tata, che è nostra intenzione andare ben 
più in là. Per questa volta si dovranno 
invece accontentare di un’applicazione 
per la sola sezione di input, e cioè 
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fig. 5 

Schema elettrico dell'adattatore per joystick. 


ci 



nenti: R1...R8 resistenze 1000 ohm 1/4 W. 

CI connettore a 10 poli per il collegamento con l'interfaccia. 
C2 connettore tipo Cannon maschio a 9 poli. 




fig. 7 

Distinzione dei vari contatti nello spinotto Cannon. 
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un 'interfaccia per joystick se- 
condo lo standard Keaipston 

Un joystick è uno strumento piuttosto 
semplice, che trasmette le informazioni 
relative alla sua posizione per mezzo del- 
l’apertura e chiusura di contatti. Per la 
precisione, in un joystick vi sono quattro 
interruttori, corrispondenti alle quattro 
direzioni fondamentali (avanti, indietro, 
destra e sinistra), più uno per il pulsante. 
Ovviamente possono essere azionati con- 
temporaneamente anche due interrutto- 
ri, come nel caso della direzione Nord-Est 
(avanti più destra) o Sud-Ovest (indietro 
più sinistra), ad esempio. Se poi contem- 
poraneamente facciamo fuoco, gli inter- 
ruttori azionati saranno addirittura tre. 
Per le modalità della trasmissione di que- 
ste informazioni esistono vari standard. 
Nel nostro caso la scelta si pone fra lo 
standard 'Sinclair ed il Kempston, che 
sono i più diffusi. 

Se la scelta finale è caduta sul sistema 
Kempston, non è stato solo perché di fat- 
to è questo il sistema maggiormente adot- 
tato, ma soprattutto perché esso preve- 
de, come indirizzo dell’interfaccia cui è 
collegato il joystick, il 31, che, come ab- 
biamo visto, è uno degli indirizzi “buoni” 
anche per la nostra interfaccia. 

Questo sistema prevede che a ciascun 
interruttore corrisponda un bit degli otto 
formanti il byte inviato all’interfaccia; un 
bit a livello alto indicherà la chiusura del- 
l’interruttore corrispondente, uno a livel- 
lo basso il contrario. Essendo inoltre solo 
cinque su otto i bit utilizzati, è necessario 
che i restanti siano tenuti anch’essi a livel- 
lo basso. 

Per realizzare praticamente tutto questo 
occorre prima di tutto sapere a quale ter- 
minale va collegato ciascun interruttore, 
il che equivale a stabilire quale bit sarà 
influenzato da ciascun movimento. Que- 
sto lo trovate in figura 4. Quindi bisogna 
fare in modo che 


interruttore aperto=livello basso; 
interruttore chiuso=livello alto, 

cioè il contrario di quello che accade nor- 
malmente. Abbiamo visto, infatti, che le 
linee non collegate sono considerate a li- 


vello alto. Dovremo quindi forzare a livel- 
lo basso tutte e otto le linee, cioè collegar- 
le a massa, oltre che, per cinque di loro, 
ai rispettivi interruttori. L’altro contatto 
di ciascun interruttore sarà collegato con 
il polo positivo, in modo da portare a 
livello alto, chiudendosi, la linea corri- 
spondente. 

Ovviamente il collegamento a massa del- 
le varie linee non potrà avvenire in modo 
diretto. In questo caso, infatti, la chiusura 
degli interruttori metterebbe in contatto 
positivo e negativo, provocando un corto- 
circuito. 

Occorre invece interporre fra ciascuna li- 
nea e la massa una resistenza di valore 
adatto. 

La figura 5 riporta lo schema completo, 
mentre la 6 è il piano di montaggio con 
l’elenco dei componenti. 

Come vedete dalle foto, è stata usata la 
solita basetta sperimentale, a bollini. Dal- 
l’interfaccia arrivano le otto linee IN (a 
cui è opportuno che corrispondano dei 
collegamenti piuttosto lunghi, circa 25 
cm) e i due poli dell’alimentazione. Riu- 
nendo tutte queste terminazioni in un 
connettore avremo il vantaggio di poter 
di volta in volta collegare ciò che realizze- 
remo senza dover dissaldare e risaldare, 
oltre ad avere tutti i contatti a portata di 
mano. 

Sulla basetta di collegamento con il joy- 
stick andrà montato un connettore com- 
plementare dal lato dell’interfaccia ed 
una spina adatta dal lato del joystick. 


linea IN 

contatto 


spinotto Cannon 

0 

2 

1 

3 

2 

4 

3 

5 

4 

9 

+5V 

7 


fig. 8 

Elenco dei collegamenti con lo 
spinotto Cannon. 


Questo spinotto sarà di tipo Cannon ma- 
chio a nove poli: i collegamenti corrispon- 
denti li vedete in figura 7, oltre a trovarli 
elencati in figura 8. Quelli indicati sono i 
collegamenti dello standard Atari, adotta- 
to in tutti i joystick. 

! In questo caso non è necessario alcun 
collaudo di sicurezza. Nessun errore di 
montaggio può infatti danneggiare lo 
Spectrum. L’unico danno possibile è al- 
l’alimentatore dell’interfaccia, in caso di 
cortocircuito fra positivo e negativo. 

Per provare il tutto il metodo più sempli- 
ce è quello di caricare da cassetta un 
gioco provvisto dell’opzione per il joy- 
stick Kempston. L’ordine delle operazio- 
ni sarà: 

1 - inserimento ed accensione interfac- 
cia; 

2 - accensione Spectrum; 

3 - caricamento gioco. 

L’inserimento e il disinserimento eventua- 
le del circuito joystick dalle linee IN, per 
mezzo del suo connettore, non provoca 
alcun effetto negativo. 

All’atto della prova l’unico errore che po- 
treste riscontrare è l’inversione di due o 
più collegamenti. In questo caso due o 
più movimenti del joystick non saranno 
esatti: ricontrollate con lo schema e fate 
questa controprova: fate girare 

10 PRINT AT 10,10;OUT 31 
20 GO TO 10 


e controllate i valori visualizzati per le 
| varie posizioni del joystick. Quelli giusti 
sono: 


posizione joystick 

valore 

avanti 

8 

indietro 

4 

destra 

2 

sinistra 

1 

fuoco 

16 


Augurandoci che possiate trarre dalle fo- 
to del prototipo altre informazioni sul 
montaggio, vi auguriamo buon diverti- 
mento e vi aspettiamo alla prossima pun- 
tata con qualche applicazione più seria. 
Quelli di voi che fossero interessati ad 
un’interfaccia esclusivamente ad uso joy- 
stick, comunque, avranno prossimamen- 
te una sorpresa: un’interfaccia di dimen- 
sioni e costo ridottissimi, e prestazioni ec- 
cezionali. A presto! 



LA PRIMA E UNICA RIVISTA DI VIDEOGAMES - COMPUTER 

GIOCHI ELETTRONICI 






di Simon Housden 

trad. e adatt. di Paolo Maffei 

Bastano 16K per provare l’emo- 
zione di nn lancio nel vuoto! 


I n questo gioco dovete guidare sul ber- 
saglio cinque paracadutisti, che si lan- 
ciano uno alla volta da un aliante in lenta 
planata nella parte alta dello schermo. 
Muovendoli a destra o a sinistra con i tasti 
O e P, dovete cercare di bilanciarne lo 
spostamento, dovuto al continuo soffiare 
del vento, in una direzione a voi inizial- 
mente ignota. Naturalmente, più lanci fi- 
niranno sul bersaglio più si incrementerà 
il vostro punteggio. 



5 GO SUB 9000 
7 LET hs=0 

10 LET p=32 : LET x=15: LET y=4 
: LET s=0: LET m= 5 
20 BORDER 2: INK 1: PAPER 6: 
CLS 

30 PRINT "VUOI LE ISTRUZIONI? ( 
s/n) " 

35 IF INKEY$=" " THEN GO TO 35 

40 IF INKEY$="S" OR INKEY$="S" 
THEN GO SUB 9200 


90 CLS 

100 FOR n=0 TO 31: PRINT AT l,n 
; " {SG8}" ; AT 21 , n; " {SG8 } " : 
NEXT n: FOR n=2 TO 20: 
PRINT AT n, 0 ; " {SG8 } " ; AT n, 
31 ;" {SG8 } " : NEXT n 
120 PRINT AT 0, 1 ;"PUNTI";AT 0,1 
2; "RECORD" ;AT 0 , 24 ; "PARAC . " 

140 PRINT AT 19,14; "MQN" ; AT 20, 
1 4;"ORP" 

160 LET r=INT (RND*2) 

1000 PRINT AT 0 , 7 ; s ; AT 0,19;hs; 
AT 0 , 30 ;m 
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1010 PRINT AT y , x- 1 ; " " ; AT y-l,x 
-1;" " ;AT y-2,x-l;" ";AT y, 
x+2;" " ; AT y-1, x+2;" " ;AT y 
-2 ,x+2 ; " " 

1020 IF p=32 THEN GO SUB 2000 
1050 IF r=0 THEN LET w=(RND*0.9 
) 

1060 IF r=l THEN LET W=-(RND*0. 
9) 

1100 IF INKEY$="p" THEN 
GO SUB 3000 

1110 IF INKEY$="o" THEN 
GO SUB 4000 

1 200 PRINT AT y,x; "jCL" ; AT y-l,x; 

"I^J";AT y-2,x; "GH" 

1210 IF y>4 . 5 AND x>2 THEN 
PRINT AT y-4,x-1 ;" 

AT y-3 f x+l;" " ; AT y-4,x+l 

• Il II 

t 

1222 IF y>4 . 5 AND x<29 THEN 

PRINT AT y-4 , x- 1 ; " "; 

AT y-3,x;" " 

1 300 BEEP . 005 ,w*l 0 
1350 IF y>5 AND x>1.5 AND ATTR ( 
y-3 ,x-l ) >7 THEN PRINT AT y 
- 3 , x- 1 ; " " 

1360 IF y>5 AND x<28 AND ATTR (y 

- 3 , x+2 ) >7 THEN PRINT AT y- 
3, x+2;" " 

1370 IF y>5 AND x>2.5 AND ATTR ( 
y-3,x-2) >7 THEN PRINT AT y 

- 3 , x- 2 ; " " 

1400 IF x>=28 THEN LET x=2: 

PRINT AT y , 2 8 ; " {SG8 } " ; 

AT y-1,28;" {SG8}";AT y-2 

,28;" {SG8}";AT y-3, 28;" 

{SG8 } " 

1410 IF x<2 THEN LET x=28.5: 

PRINT AT y , 0 ; " { SG8 } "; 

AT y-l,0;"{SG8} " ; AT y-2, 

0 ; " { SG8 } " ; AT y-3 , 0 ; " 

{SG8 } " 

1 500 LET x=x+w 

1800 IF y=l 8 THEN GO TO 8000 
1900 LET y=y+2 

1 999 GO TO 1 000 

2000 LET p=p-1 
2005 BEEP .006,10 

2010 IF p<=30 AND p>=l THEN 

PRINT AT 2 ,p; "A" ; AT 3,p,*"D 

II 

2020 IF p< = 2 9 AND p> = 0 THEN 

PRINT AT 2 , p+1 ; "B" ; AT 3,p+ 
1 ; "E" 

2030 IF p<=28 AND p>=-l THEN 

PRINT AT 2 , p+2 ; "C" ; AT 3,p+ 


2; "F" 


2040 

IF p<=27 AND p>=-2 THEN 



PRINT AT 2 , p+3 ; " " ; AT 
3;" " 

3 , p+ 

2050 

IF p<- 2 THEN RETURN 


2060 

IF p=l 4 THEN PRINT AT 

1 ; "KL" 

4 , p+ 

2070 

IF p=1 2 THEN PRINT AT 

3 ; "GH" ; AT 3,p+3;"IJ" 

2 , p+ 

21 00 

GO TO 2000 


3000 

LET x=x+.5 


301 0 

PRINT AT y ,x- . 5 ; " " ; AT 

y-1 , 


x-.5;" " ; AT y-2,x-.5;" 

II 

3999 

RETURN 


4000 

LET x=x- . 5 


401 0 

PRINT AT y ,x+l . 5 ; " " ; AT 

y-1 


,x+1.5;" " ; AT y-2,x+1.5 

# Il II 

t 

4999 

RETURN 


8000 

LET m=m-l 


8010 

IF X> = 1 3 . 5 AND x< = 1 5 THEN 


LET s=s+600 : FOR n=30 TO - 
30 STEP -1: BEEP .005,n: 
NEXT n: FOR n=-30 TO 30: 


BEEP . 009 ,n: NEXT n 
8020 IF x<=l 3 . 5 AND x>=l 3 THEN 
LET s=s+300 

8030 IF x< 1 3 THEN LET s=s+50 
8040 IF x>l 5 AND x<=16 THEN 
LET s=s+300 

8050 IF x>1 6 THEN LET s=s+50 
8060 LET x = l 5 : LET y=4: LET p=32 

8450 IF m=0 THEN GO TO 8500 

8499 FOR f=l TO 50: NEXT f: 

GO TO 90 

8500 IF s>hs THEN LET hs=s 
8540 PRINT AT 0,7;s;AT 0,19;hs; 

AT 0 , 30 ;m 

8600 PRINT AT 10,11 ;"GAME OVER" 
8700 FOR f=l TO 100: NEXT f 

8999 GO TO 10 

9000 FOR c=l TO 18: FOR n=0 TO 7 
: READ d: POKE USR (CHR$ (1 
43+c) ) +n ,d : NEXT n: NEXT c 

9010 DATA 0,224,240,120,60,30,63 
,255 

9020 DATA 0,0,0,0,0,0,0,255 
9030 DATA 0,0,0,3,7,111,63,255 
9040 DATA 255,15,7,3,1,0,0,0 
9050 DATA 255,128,192,192,224,24 
0,120,56 

9060 DATA 252,14,7,0,0,0,0,0 
9070 DATA 0,3,15,63,255,128,64,6 
4 

9080 DATA 0,192,240,252,255,1,2, 
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2 

9090 DATA 32,32,16,16,8,8,4,4 

9100 DATA 4,4,8,8,16,16,32,32 

9110 DATA 2, 2, 1,1, 0,0, 1,3 

9120 DATA 64,64,128,128,128,128, 
128,0 

9130 DATA 0,0,7,28,113,199,159,1 
91 

9140 DATA 0,0,224,56,142,227,249 
,253 

9150 DATA 191,159,199,113,28,7,0 

,0 

9160 DATA 253,249,227,142,56,224 

, 0,0 

9170 DATA 0,255,129,60,255,255,2 
55,255 

9180 DATA 255,255,255,255,60,129 
,255,0 



9199 RETURN 

9200 CLS 

9210 PRINT TAB 8 ; "PARACADUTISMO" 

9220 PRINT '"Cinque paracadutist 
i saltano da un aeroplano, 
uno alla volta." 

9230 PRINT '"Tu puoi controllare 
la direzionedi ognuno di 1 
oro e devi fare inmodo che 
atterrino il piu ' vicinoposs 
ibile al bersaglio posto su 
lsuolo. " 

9240 PRINT '"Il punteggio varia 
secondo" '"la precisione del 
lancio . " 

9250 PRINT "'L' operazione e' 
resa piu' difficile dal 
vento che spira dauna direz 
ione che non conoscete." 

9260 PRINT '" 0=SINISTRA P 

=DESTRA" 

9300 PRINT '" PREMI UN TASTO PE 
R INIZIARE." 

9400 PAUSE 0: CLS : RETURN 
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di Daniele Malavasi 



Una produzione 
per SUPERSINC 



E cco un programma che vi permetterà 
di trasformare lo Spectrum 48K in un 
informatore veloce e preciso, in grado di 
fornire tutte le principali caratteristiche 
geografiche delle novantacinque città ita- 
liane capoluogo di provincia. 

Ad ogni nominativo inserito apparirà una 
videata contenente un data-set di infor- 
mazioni qualitative (nome della città e 
della regione di appartenenza, le qualifi- 
che e la targa automobilistica) e quantita- 
tive (popolazione residente, nome e di- 
stanza della città più vicina e più lontana 
e distanze da Roma e da Milano). 

Non solo: infatti, alla fine della videata 
compare anche un indicatore geografico 
lampeggiante, che mostra con la massima 
precisione la posizione della città scelta 
nell’ambito dell’Italia. Diventa così possi- 
bile chiarire una volta per tutte quei dub- 
bi che molti di noi hanno lasciato irrisolti 
fin dalle lontane scuole elementari. 

Siete sicuri, ad esempio, di conoscere il 
capoluogo di regione del Molise, oppure 
chi ha più abitanti tra Roma e Milano o 
tra Torino e Napoli? Sapreste dire quali 
sono le due città tra loro più vicine o più 
lontane? Vorreste sapere se esiste una 
città che abbia egual distanza sia da Ro- 
ma che da Milano? Siete in grado di dire 
qual è il capoluogo di provincia che ha 
meno abitanti, qual è quello che ne ha di 
più, quanti sono quelli che ne hanno più 
di un milione, oppure qual è la targa di 
La Spezia, di Caltanissetta o di Vero- 
na? 

Risposte a quesiti come quelli appena 
portati ad esempio sono proprio l’oggetto 
del programma, che si rivelerà utilissimo 
anche ai sinclairisti più giovani, quelli che 
hanno ancora scolasticamente a che fare 
con la geografia. 

Da notare che i dati forniti sono stati ag- 
giornati all’ultimo censimento generale 
effettuato dall’ISTAT e che le distanze 
chilometriche fornite sono state calcolate 
secondo i percorsi via terra più brevi. 
Ultima nota importante: è condizione in- 
dispensabile far girare il programma su 



uno Spectrum 48K, che per altro sarà 
riempito completamente (si, proprio com- 
pletamente, nel senso che rimarranno li- 
beri solo alcuni byte di RAM!). 

Coae osare il programma 

Per usare correttamente e senza incon- 
venienti “Città d’Italia” è bene leggere 
e ricordare le istruzioni scritte qui di 
seguito, visto che il programma, occu- 
pando già da solo tutta la memoria di- 
sponibile sullo Spectrum 48K, non le 
contiene. Infatti all’inizio appare un 
messaggio che invita a consultare la do- 
cumentazione originale, che è appunto 
rappresentata dalle seguenti righe. 


Dopo alcuni secondi di standby la prima 
cosa che appare sul video è la cartina 
geografica dell’Italia, che viene disegna- 
ta completa di suddivisioni regionali (e 
con la massima definizione ottenibile 
sullo Spectrum) sulla parte sinistra del 
video. Subito dopo compaiono due ri- 
quadri gialli. Il primo, in alto a sinistra, 
serve come monitor e mostra in tempo 
reale il codice inserito relativo alla città 
scelta: infatti il messaggio rosso lampeg- 
giante “CODICE”, ad esso attribuito, e 
un beep intermittente indicano che il 
computer è in attesa di un vostro inseri- 
mento. Il secondo dei due riquadri gialli 
è diviso in due sezioni in cui verranno 
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Descrizione del programma 

Linee Commento 

Sottoprogramma di lancio (listato 1) 

10 Inizio del sottoprogramma; predisposizione del video 

11 Dati relativi al caricamento del master 

Master (listato 2) 

10- 14 Inizio del master; dati preliminari; predisposizione video 

101 - 290 Predisposizione grafica del video 
301 - 399 Routine principale di gestione 
402 - 403 Primo data-set grafico 

433 - 475 Routine di stampa dei dati relativi alla città scelta 
484 - 6849 Subroutine con data-set delle città 
6860 - 6861 Routine di preparazione per nuovi inserimenti 
6901 - 6954 Routine di plottaggio e stampa dell’indicatore geografico 
lampeggiante 

7010 - 7019 Memorizzazione delle stringhe 

7100 - 7119 Routine di scelta della regione di appartenenza 

7510 - 7520 Secondo data-set grafico 

7610 - 7699 Dati iniziali e istruzioni 

7901 - 8099 Terzo data-set grafico 

9651 -9653 Subroutine di scelta dei dati di qualifica 

9710-9749 Quarto data-set grafico 

9760 - 9799 Quinto data-set grafico 

9832 - 9890 Set dei microcaratteri di scrittura 

9932 - 9999 Sesto data-set grafico 

I due sottoprogrammi appena analizzati vanno salvati l’uno dopo l’altro 
consecutivamente, secondo il sottostante modello di riferimento. 


mostrati i nomi della città scelta e della 
relativa regione di appartenenza. Nulla 
verrà comunque eseguito senza che voi 
abbiate inserito il giusto nominativo. 
Una volta scelta la città di cui volete 
conoscere le informazioni disponibili di- 
gitate, tramite la tastiera, il relativo no- 
me: è importante sapere che è sufficien- 
te battere le prime quattro lettere di 
ogni nominativo, dopodiché il compu- 
ter, riconoscendo la vostra scelta, pro- 
cederà automaticamente a svolgere tut- 
to il lavoro di visualizzazione. 

Se ad esempio volete MILANO, baste- 
rà digitare “MILA”. Analogamente per 
ROMA (“ROMA”), C ALT ANISSETT A 
(“CALT”), CAGLIARI (“CAGL”) e così 
via per tutte le altre città, con alcune 
eccezioni (dovute a denominazioni com- 
poste o particolari) che sono: 


Ascoli Piceno ASCO 

Catanzaro CANZ 

L’Aquila LAQU 

La Spezia LASP 

Massa Carrara MASS 

Pesaro e Urbino PESA 

Reggio Calabria RECA 

Reggio Emilia REEM 


Questi otto codici sono facilmente ricor- 
dabili, di modo che non vi creeranno 
alcuna confusione, dopo un po’ di prati- 
ca. Attenzione che il computer non ac- 
cetta codici ambigui, nel senso che digi- 
tando ad esempio “MILN” o “MELA” 
non otterrete sul video la proiezione re- 
lativa a Milano, ma il codice verrà an- 
nullato e dovrete digitare quello giusto. 
Dopo ogni inserimento corretto verrà 
mostrata la videata relativa al nominati- 
vo scelto. Potrete vedere nell’ordine: 
nome della città e della regione di ap- 
partenenza, qualifiche (capoluogo di 
provincia, capoluogo di regione, capita- 
le d’Italia), targa automobilistica, popo- 
lazione residente (dati riferiti all’ultimo 
censimento generale ISTAT del 25-10- 
1981), nome e distanza della città più 
vicina e della città più lontana, distanza 
da Roma e distanza da Milano. 
Ovviamente, per le città insulari la di- 
stanza da Roma e da Milano non viene 
indicata. 

Alla fine di ogni videata compare anche 
un indicatore lampeggiante, che segna- 
la l’esatta posizione geografica della cit- 
tà considerata, e la situazione rimane 
tale fino a che si preme un tasto qualsia- 
si, al fine di cancellare i dati mostrati e 
di procedere ad un altro inserimento. 

I dettagli pratici 

Per le prime volte è bene tenere sottoc- 


chio le istruzioni prima esposte, con 
particolare riferimento alle otto città 
che fanno eccezione alla regola del codi- 
ce. 

La particolare caratteristica del pro- 
gramma rende possibile organizzare ga- 
re e giochi, allo scopo di vedere chi è il 
più bravo in geografia, magari facendo 
domande che poi potranno essere veri- 
ficate e confrontate con quelle proietta- 
te su video. 

E’ importante ricordare che l’indicatore 
ottico geografico lampeggiante sarà di 
validissimo aiuto mnemonico anche ai 
bambini, motivo per cui consigliamo di 
non tagliarli fuori da quella che sarà 
l’audience del programma; anzi, l’aiuto 
di un istruttore o di un familiare più 
grande avrà per loro enorme valore di- 
dattico. 

Come registrare un programmi 

Iniziate battendo il listato 1, relativo al 
sottoprogramma di lancio, e salvatelo 
su cassetta con l’istruzione SAVE “Città 
d’It” LINE 1. Dopo averne verificato 
l’esatto salvataggio iniziate la battitura 


del listato 2, relativo al sottoprogram- 
ma master. 

Se credete di non riuscire a batterlo 
tutto in una volta, munitevi di una se- 
conda cassetta, sulla quale potrete sal- 
vare e risalvare senza problemi i vostri 
elaborati provvisori. Comunque, quan- 
do sarete riusciti a ricopiare perfetta- 
mente detto listato andrete a salvarlo 
con l’istruzione SAVE “MASTER” LI- 
NE 1 sulla cassetta dove già avevate 
inserito il sottoprogramma di lancio, 
con l’accortezza di lasciare uno spazio 
vuoto di circa 3-4 secondi tra i due File. 
Se tutto va bene, una volta fatta la veri- 
fica e dato il LOAD ”” dopo aver riav- 
volto il nastro, il programma dovrebbe 
girare automaticamente dopo circa 230 
secondi di carica; il video diventerà allo- 
ra bianco e compariranno varie scritte 
e disegni, dopodiché vi sarà chiesto di 
inserire un nominativo (e la prima scelta 
andrà senz’altro alla vostra città!). 
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Città d’Italia 

versione per ZX Spectrum 48K 

Listato 1 

10 PAPER 0: BORDER 0: CLS : 
PRINT #1 ;AT 0,0; INK 1 ; " 
{G5}{30G3}{SG5}{G1 }{30G3} 


{G2 } " ; AT 0,7; INK 6;" CITTA 
' D'ITALIA " ; AT 1,5; INK 7 
;" © 1984 by DISCOVOGUE " 

11 FOR n=l TO 3: BEEP .1,20: 
BEEP .1,23: BEEP .1,37: 
NEXT n: PAUSE 30: LOAD "" 
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Città d'Italia 

versione per ZX Spectrum 48K 

Listato 2 

10 INK 0: PAPER 7: BORDER 7: 

CLS : OVER 0: INVERSE 0: 
POKE 23562,1: POKE 23658,2 
55: GO SUB 7000: GO SUB 750 
0: LET qu=0 

11 REM { 22SG3 } 

12 REM CITTA' D'ITALIA 

13 REM © 1984 by DISCOVOGUE 

14 REM { 22SG3 } 

101 GO SUB 7600: GO SUB 8000 

105 LET x=4 : LET y=l: PLOT x-4, 
y: DRAW 135,0: DRAW 0,151: 
DRAW -135,0: DRAW 0,-151: 
GO SUB 9700: GO SUB 9750 
290 GO SUB 400: GO TO 391 
301 LET qu=0 : FOR n=l TO 4 

311 LET k=CODE INKEY$ : IF k>64 

AND k<91 THEN PRINT AT 0, 
0; INK 1; OVER 1;" ": 

GO TO 320 

312 IF k>0 THEN BEEP .2,-20: 

. GO TO 31 1 

313 LET z=9- z : BEEP .01,50: 

PRINT AT 0,0; INK z; 

OVER 1;" ": GO TO 311 

330 LET a(n)=k-64: GO SUB 9800+ 
k: LET xx=xx+4: BÉEP .2,50: 

NEXT n 

331 LET sm=a ( 1 ) * 300+a ( 2 ) * 20+a ( 3 
) * 2 t a ( 4 ) 

390 IF sm>484 AND sm<6826 

THEN GO SUB sm : IF qu>0 

THEN GO SUB 420 

391 FOR n=l 74 TO 168 STEP -1: 

INVERSE 1: PLOT 40, n: 

DRAW 210,0: PLOT l,n-8: 
DRAW 30,0: PLOT 40,n-8: 
DRAW 210,0: NEXT n: 

INVERSE 0: IF qu=0 THEN 
GO TO 399 

393 DATA 4,5,6,8,10,12,14,16,18 
: RESTORE 393: FOR n=l TO 9 
: READ a: PRINT AT a, 18;" 

": NEXT n 

395 FOR n = 3 TO 18: PRINT AT n , 1 
8; INK 7; OVER 1 ;" 

": NEXT n 

399 INK 0: BRIGHT 0: OVER 0: 

GO SUB 6850 


402 PRINT AT 1,0; PAPER 6; 

BRIGHT 1;" ";AT 0,5;c$( 
1 TO 27) ;AT 1 , 5 ; c$ ( 1 TO 27) 

403 PLOT 0,159: DRAW 32,0: 

DRAW 0,8: DRAW -32,0: 

DRAW 0,-8: PLOT 39,167: 
DRAW 216,0: DRAW 0,-8: 

DRAW -216,0: DRAW 0,16: 
DRAW 216,0: DRAW 0,-8: 
RETURN 

433 RESTORE 8010: FOR m=l TO 2: 
READ xx : READ yy : READ i : 
READ f: FOR n=i TO f: 

INK 0: GO SUB 9800+CODE p$ 
(n) : LET xx=xx+4: NEXT n: 
NEXT m 

441 LET xx=70 : LET yy=169: 

FOR n=l TO LEN c$: 

GO SUB 9800+CODE c$ (n) : 
BEEP ,01,yy/3: LET xx=xx+4 
: NEXT n 

442 GO SUB 7100+k: LET xx=75: 

LET yy=l 61 : FOR n = l TO 
LEN r$ : GO SUB 9800+CODE r$ 
(n) : BEEP . 01 , yy/3 : LET xx= 
xx+4: NEXT n 

445 FOR n=3 TO 18: PRINT AT n,l 
8; INK 2; OVER 1;" 

" : NEXT n : BEEP .1,10: 
PAUSE 10 

450 LET yy=145: FOR z=l TO qu : 
LET xx=150: LET yy=yy- 7 : 

GO SUB 9650+z : NEXT z 

452 LET xx= 1 50 : LET yy=106: 

FOR n=l TO LEN t$: 

GO SUB 9800+CODE t$ (n) : 
BEEP .01, yy/3: LET xx=xx+4 
: NEXT n 

453 LET xx=l 50 : LET yy=90: 

FOR n=l TO LEN a$ : 

GO SUB 9800+CODE a$ (n) : 
BEEP .01, yy/3: LET xx=xx+4 
: NEXT n 

454 LET xx= 150: LET yy=74: 

FOR n=l TO LEN v$ : 

GO SUB 9800+CODE v$ (n) : 
BEEP .01, yy/3: LET xx=xx+4 
: NEXT n 

455 LET xx=l 50 : LET yy=58: 

FOR n=l TO LEN 1$: 

GO SUB 9800+CODE 1$ (n) : 
BEEP .01, yy/3: LET xx=xx+4 
: NEXT n 
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456 LET xx=150: LET yy=42: 

FOR n=l TO LEN 0 $ : 

GO SUB 9800+CODE o$ (n) : 
BEEP .01,yy/3: LET xx=xx+4 
: NEXT n 

457 LET xx=150: LET yy=26: 

FOR n=l TO LEN m$ : 

GO SUB 9800+CODE m$ (n) : 
BEEP .01 / yy/3: LET xx=xx+4 
: NEXT n 

475 GO SUB 6900: RETURN 

484 RETURN 

485 LET c$="AGRIGENTO" : LET k=l 
8: LET qu=l : LET an=74: 

LET bn = l 2 : LET t$="AG" : 

LET a$="51 .325": LET v$="C 
ALTANI SSETTA (68 KM.)": 

LET 1$="MESSINA (292 KM.)" 
: LET o$ = " " : LET m$ = " 


568 RETURN 

569 LET c$=" ALESSANDRIA" : LET k 
=0: LET qu=l : LET an=21 : 

LET bn = l 1 7 : LET t$="AL" : 

LET a$="l 00.523" : LET v$=" 
ASTI (37 KM.)": LET 1$="REG 
GIO CALABRIA (1351 KM.)": 

LET o$=" 609 KM.": LET m$ = " 
90 KM." 

600 RETURN 

601 LET C$="ANCONA" : LET k=10: 

LET qu=2 : LET an=70: LET b 
n=98 : LET t$="AN": LET a$ = " 
1 0 6. 498": LET v$ = "MACERATA 
(53 KM.)": LET l$="REGGIO C 
ALABRIA (923 KM.)": LET 0$= 
"287 KM.": LET m$="419 KM." 

657 RETURN 

658 LET c$=" AOSTA": LET k=l : 

LET qu=2: LET an=8: LET bn 
=129: LET t$="AO" : LET a$=" 
37.194": LET v$="TORINO (11 
7 KM.)": LET 1$=" REGGIO CAL 
ABRIA (1499 KM.)": LET 0$=" 
757 KM.": LET m$="183 KM." 

664 RETURN 

665 LET c$="BARI": LET k=15: 

LET qu=2: LET an=107: 

LET bn=65 : LET t$="BA": 

LET a$="371 .022" : LET v$=" 
MATERA (65 KM.)": LET 1$="A 
OSTA (1072 KM.)"? LET o$="4 
59 KM.": LET m$="889 KM." 



695 RETURN 

696 LET c$=" AREZZO" : LET k=8: 

LET qu=l : LET an=51 : LET b 
n=96 : LET t$="AR": LET a$=" 
92.105": LET v$="SIENA (65 
KM.)": LET l$="REGGIO CALAB 
RIA (958 KM.)": LET o$="216 

KM.": LET m$=" 376 KM." 

700 RETURN 

701 LET C$=" ASCOLI PICENO": 

LET k=l 0 : LET qu=l : LET an 
=71: LET bn=89 : LET t$="AP" 
: LET a$="54.298": LET v$=" 
TERAMO (36 KM.)": LET 1$ = "R 
EGGIO CALABRIA (859 KM.)": 

LET o$=" 1 96 KM.": LET m$=" 
539 KM." 

728 RETURN 

729 LET c$="ASTI" : LET k=0: 

LET qu=l : LET an = l 7 :' LET b 
n = ll 8 : LET t$ = "AT" : LET a$ = 
"77.681": LET v$=" ALESSANDR 
IA (37 KM.)": LET 1$="REGGI 
O CALABRIA (1388 KM.)": 

LET o$=" 646 KM.": LET m$=" 
121 KM." 

732 RETURN 

733 LET c$ =" BENEVENTO" : LET k=l 
4: LET qu=l : LET an=85: 

LET bn=65 : LET t$="BN": 

LET a$="62.636": LET v$ = "A 
VELLINO (31 KM.)": LET 1$=" 
AOSTA (990 KM.)": LET 0$="2 
38 KM.": LET m$="807 KM." 

735 RETURN 

736 LET c$=" BELLUNO" : LET k=4: 

LET qu=l : LET an=57: LET b 
n=l 34 : LET t$ = "BL": LET a$ = 
"36.634": LET V$=" PORDENONE 

(67 KM.)": LET l$="REGGIO 
CALABRIA (1316 KM.)": LET o 
$="615 KM.": LET m$="324 KM 

II 

742 RETURN 
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743 LET c$ =" BERGAMO " : LET k = 2: 

LET qu=l : LET an=32: LET b 
n = 1 27 : LET t$ = "BG": LET a$ = 
"122.142": LET v$=" BRESCIA 
(51 KM.)": LET l$="REGGIO C 
ALABRIA (1333 KM.)": LET 0$ 
="591 KM.": LET m$=" 52 KM." 

761 RETURN 

762 LET c$=" AVELLINO" : LET k=14 
: LET qu=l: LET an=86: 

LET bn=62 : LET t$="AV": 

LET a$="56. 892" : LET v$="B 
ENEVENTO (31 KM.)": LET 1$= 
"AOSTA (994 KM.)": LET 0$=" 
242 KM.": LET m$=" 81 1 KM." 

938 RETURN 

939 LET c$ =" BOLOGNA" : LET k=7: 

LET qu=2 : LET an=48: LET b 
n = l 1 0 : LET t$="BO" : LET a$ = 
"459.080": LET v$=" FERRARA 
(47 KM.)": LET l$="REGGIO C 
ALABRIA (1121 KM.)": LET 0$ 

="379 KM.": LET m$="211 KM. 

Il 

945 RETURN 

946 LET c$="CAGLIARI" : LET k=19 
: LET qu=2 : LET an=24: 

LET bn=39 : LET t$="CA" : 

LET a$="233. 848" : LET v$=" 
ORISTANO (92 KM.)": LET 1$= 
"SASSARI (215 KM.)": LET 0$ 
= " " : LET m$ = " " 

949 RETURN 

950 LET c$="BOLZANO-BOZEN" : 

LET k=3 : LET qu=l : LET an= 
49: LET bn = l 39 : LET t$ = "BZ" 
: LET a$="l 05. 1 80" : LET v$= 
"TRENTO (58 KM.)": LET 1$=" 
REGGIO CALABRIA (1391 KM.)" 

: LET o$=" 649 KM.": LET m$ = 
"272 KM." 

960 RETURN 

961 LET c$="CATANIA" : LET k=18: 

LET qu=l : LET an=90: LET b 
n=l 7 : LET t$ = "CT" : LET a$ = " 
380.328": LET v$="SIRACUSA 
(58 KM.)": LET 1$="TRAPANI 

(352 KM. ) " : LET 0$ = " " 

: LET m$ = " ": RETURN 

962 LET c$="CAMPOBASSO" : LET k= 
13: LET qu=2 : LET an=84: 

LET bn=71 : LET t$="CB": 

LET a$="48.291": LET v$="I 


SERNIA (58 KM.)": LET 1$="A 
OSTA (930 KM.)": LET o$="23 
2 KM.": LET m$=" 747 KM.": 
RETURN 

963 LET c$= "CASERTA" : LET k=14: 

LET qu= 1 : LET an = 81 : LET b 
n=64 : LET t$="CE": LET a$=" 
66.318": LET v$="NAPOLI (30 
KM.)": LET 1$=" AOSTA (940 
KM.)": LET o$=" 1 88 KM.": 

LET m$=" 757 KM.": RETURN 

964 LET c$="CALTANISSETTA" : 

LET k=l 8 : LET qu=l: LET an 
= 79: LET bn = l 4 : LET t$ = "CL" 

: LET a$="61 .146": LET v$=" 
ENNA (38 KM.)": LET 1$="TRA 
PANI (253 KM.)": LET 0$="-- 
" : LET m$ = " " 

973 RETURN 

974 LET c$ = "CATANZARO" : LET k=l 
7: LET qu=l : LET an=106: 

LET bn=36 : LET t$="CZ": 

LET a$="l 00 . 832" : LET v$=" 
COSENZA (94 KM.)": LET 1$=" 
AOSTA (1400 KM.)": LET 0$=" 
648 KM.": LET m$="1217 KM." 

988 RETURN 

989 LET c$="BRESCIA" : LET k=2: 

LET qu=l : LET an=37: LET b 
n=l 25 : LET t$ = "BS": LET a$ = 
"206*661": LET V$ = "CREMONA 
(49 KM.)": LET l$="REGGIO C 
ALABRIA (1294 KM.)": LET 0$ 
="552 KM.": LET m$="97 KM." 

991 RETURN 

992 LET c$ =" BRINDI S I " : LET k=15 
: LET qu=l : LET an=120: 

LET bn=59 : LET t$="BR": 

LET a$="89.786": LET v$="L 
ECCE (40 KM.)": LET l$="AOS 
TA (1183 KM.)": LET O$="570 
KM.": LET m$=" 1 000 KM." 

1082 RETURN 

1083 LET C$="CHIETI": LET k=12: 

LET qu=l : LET an=78: LET b 
n=81 : LET t$="CH" : LET a$=" 
54.927": LET v$=" PESCARA (1 
9 KM.)": LET 1$=" REGGIO CAL 
ABRIA (773 KM.)": LET o$ = "2 
14 KM.": LET m$=" 589 KM." 
1240 RETURN 
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1241 LET c$="COMO": LET k=2: 

LET qu=l : LET an=26: LET b 
n = l 29 : LET t$="CO" : LET a$ = 
"95.571": LET v$=" VARESE (2 
7 KM.)": LET 1$=" REGGIO CAL 
ABRIA (1365 KM.)": LET 0$=" 
623 KM.": LET m$="49 KM." 

1242 RETURN 

1243 LET c$="COSENZA" : LET k=17: 

LET qu=l : LET an=l 02: 

LET bn=40 : LET t$="CS": 

LET a$="l 06. 801 " : LET v$=" 
CATANZARO (94 KM.)": LET 1$ 
=" AOSTA (1308 KM.)": LET 0$ 
="568 KM.": LET m$="1109 KM 

II 

1282 RETURN 

1283 LET c$="CREMONA" : LET k=2: 

LET qu=l: LET an=36: LET b 
n = l 20 : LET t$ = "CR" : LET a$ = 
"80.929": LET v$="PIACENZA 
(33 KM.)": LET l$="REGGIO C 
ALABRIA (1258 KM.)": LET 0$ 
="516 KM.": LET m$="83 KM." 




1352 RETURN 

1353 LET c$="CUNEO" : LET k=0: 

LET qu=l : LET an=10: LET b 
n = l 1 0 : LET t$ = "CN" : LET a$ = 
"55.875": LET v$="TORINO (8 
5 KM.)": LET l$="REGGIO CAL 
ABRIA (1426 KM.)": LET o$=" 
671 KM.": LET m$="211 KM." 

1808 RETURN 

1809 LET c$="ENNA" : LET k=18: 

LET qu=l : LET an=82: LET b 
n = l 6 : LET t$ = "EN": LET a$ = " 
27.838": LET v$="CALTANISSE 
TTA (38 KM.)": LET 1$="TRAP 

ANI (261 KM.)": LET o$=" 

" : LET m$ = " " 

1953 RETURN 

1954 LET c$=" FERRARA" : LET k=7: 

LET qu=l : LET an=51 : LET b 
n = l 1 5 : LET t$ = "FE": LET a$ = 
"149.453": LET v$="ROVIGO ( 
34 KM.)": LET l$="REGGIO CA 
LABRIA (1143 KM.)": LET 0$= 
"426 KM.": LET m$="245 KM." 

2020 RETURN 

2021 LET c$ = "FIRENZE" : LET k= 8 : 

LET qu=2: LET an=47: LET L 
n = l 01 : LET t$ = "FI" : LET a$ = 
"448.331": LET v$=" PISTOIA 


(37 KM.)": LET l$="REGGIO C 
ALABRIA (1013 KM.)": LET 0$ 
="271 KM.": LET m$="299 KM. 

Il 

2120 RETURN 

2121 LET c$="FOGGIA": LET k=15: 

LET qu=l : LET an=93: LET b 
n=70 : LET t$="FG" : LET a$=" 

I 56.467": LET v$ = " BENEVENTO 
(107 KM.)": LET 1$=" AOSTA 

(950 KM.)": LET o$="345 KM. 
": LET m$=" 767 KM." 

2147 RETURN 

2148 LET c$=" FORLI ' " : LET k=7: 

LET qu=l : LET an=56: LET b 
n=l 07 : LET t$ = "FO" : LET a$ = 
"110.806": LET v$=" RAVENNA 
(27 KM.)": LET l$="REGGIO C 
ALABRIA (1068 KM.)": LET 0$ 
= "345 KM.": LET m$ = "274 KM. 

II 

2208 RETURN 

2209 LET c$="FROSINONE" : LET k=l 
1: LET qu=l : LET an=70: 

LET bn=71 : LET t$="FR": 

LET a$="44.644": LET v$="L 
ATINA (55 KM.)": LET l$="AO 
STA (836 KM.)": LET o$="84 
KM.": LET m$=" 653 KM." 
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2242 RETURN 

2243 LET c$="GENOVA": LET k=6: 

LET qu=2 : LET an=24: LET b 
n=l 1 1 : LET t$ = "GE": LET a$ = 
"762.895": LET v$="SAVONA ( 

46 KM.)": LET 1$="REGGI0 CA 

LABRIA (1281 KM.)": LET 0$= 

"526 KM.": LET m$="143 KM." 

2444 RETURN 

2445 LET C$="GORI ZIA" : LET k=5: 

LET qu=l : LET an=70: LET b 

n=l 30 : LET t$ = "GO": LET a$ = 
"41.557": LET v$="UDINE (37 
KM.)": LET l$="REGGIO CALA 
BRIA (1348 KM.)": LET o$="6 

47 KM.": LET m$="402 KM." 

2508 RETURN 

2509 LET c$="GROSSETO" : LET k=8: 

LET qu=l : LET an=46: LET b 
n=87 : LET t$="GR": LET a$ = " 
69.523": LET v$="SIENA (78 
KM.)": LET 1$="REGG IO CALAB 
RIA (938 KM.)": LET o$="183 
KM.": LET m$=" 440 KM." 

2996 RETURN 

2997 LET c$=" IMPERIA" : LET k=6: 

LET qu=l : LET an=14: LET b 
n=l 04 : LET t$ = "IM" : LET a$ = 
"41.609": LET v$="SAVONA (7 
4 KM.)": LET l$="REGGIO CAL 
ABRIA (1401 KM.)": LET 0$=" 
646 KM.": LET m$="263 KM." 

3107 RETURN 

3108 LET c$="ISERNIA" : LET k=13: 

LET qu=l : LET an=79: LET b 
n=71 : LET t$="IS" : LET a$=" 
20.145": LET v$= "CAMPOBASSO 
(58 KM.)": LET 1$=" AOSTA ( 
904 KM.)": LET o$="186 KM." 
: LET m$=" 721 KM." 

3668 RETURN 

3669 LET c$="LATINA": LET k=ll: 

LET qu=l : LET an=65: LET b 
n=70 : LET t$="LT": LET a$=" 
93.738": LET v$="FROSINONE 


(55 KM.)": LET l$="AOSTA (8 
37 KM.)": LET o$="70 KM.": 
LET m$=" 654 KM." 

3673 RETURN 

3674 LET c$="LA SPEZIA": LET k=6 
: LET qu=l : LET an=32: 

LET bn = l 06 : LET t$ = "SP": 
LET a$="115.392": LET v$=" 
MASSA (35 KM.)": LET 1$="RE 
GGIO CALABRIA (1169 KM.)": 

LET o$=" 41 4 KM.": LET m$ = " 
231 KM.": RETURN 

3675 LET c$="L ' AQUILA" : LET k=12 
: LET qu=2: LET an=70: 

LET bn=82 : LET t$="AQ" : 

LET a$="63.678": LET v$="R 
IETI (58 KM.)": LET l$="AOS 
TA (816 KM.)": LET o$="138 
KM.": LET ltl$ = " 621 KM." 

3708 RETURN 

3709 LET c$=" LECCE" : LET k=15: 

LET qu=l : LET an=122: 

LET bn=57 : LET t$="LE": 

LET a$="91 .289": LET v$="B 
RINDISI (40 KM.)": LET 1$=" 
AOSTA (1122 KM.)": LET 0$=" 
610 KM.": LET m$=" 1040 KM." 

3838 RETURN 

3839 LET c$="LIVORNO" : LET k=8: 

LET au=l : LET an=38: LET b 
n=98 : LET t$="LI": LET a$=" 
175.741": LET v$="PISA (19 
KM.)": LET l$="REGGIO CALAB 
RIA (1072 KM.)": LET 0$="31 
7 KM.": LET m$=" 306 KM." 

3930 RETURN 

3931 LET c$ = "MACERATA" : LET k=10 
: LET qu=l : LET an=70: 

LET bn=95 : LET t$="MC" : 

LET a$="43.782": LET v$="A 
NCONA (53 KM.)": LET 1$="RE 
GGIO CALABRIA (909 KM.)": 

LET o$=" 233 KM.": LET m$=" 
472 KM." 

3964 RETURN 

3965 LET C$="MATERA": LET k=16: 

LET qu=l : LET an=105: 

LET bn=59 : LET t$="MT": 

LET a$="50.71 2": LET v$="B 
ARI (65 KM.)": LET l$="AOST 
A (1105 KM.)": LET o$="478 
KM.": LET m$=" 922 KM." 

3967 RETURN 
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DAL 1° DICEMBRE 1984 

J. ADVERTISING 
E JACKSON 

PIU’ VICINI! 



Dal 1° dicembre 1984 J. ADVERTISING, concessionaria esclusiva di pubblicità 
per tutte le riviste del Gruppo Editoriale Jackson, Computer Publishing Group e J. Soft 

ha cambiato indirizzo. Il nuovo indirizzo è: 

J. ADVERTISING s.r.l. 

V.le Restelli, 5 
20124 MILANO 

Tel. 02/6882895-6882458-6880606 






Il Jacksoniano ha 9 Basic 

Video Basic, corso su cassetta per parlare subito 


Oggi è davvero facile imparare il Basic, con 
Video Basic il corso su cassetta che ti permette 
di programmare subito il tuo computer. E facile: 
tu chiedi, lui risponde, tu impari. 

Passo dopo passo. Sul tuo schermo 
appaiono le domande, le risposte, gli esercizi 


e tu, senza fatica, presto e bene, impari 
a dialogare col tuo computer, sia un VIC 20, 
un Commodore 64 o un Sinclair 
Video Basic è in edicola. Provalo subito. 

Oggi il Basic si impara così. 



GRUPPO ETHOS 




VIDEO BASIC 

abbonarsi conviene 


(5 splendidi raccoglitori 
insieme al corso completo) 



Video Basic io trovi in 
edicola a lire 8.000 il 
fascicolo con cassetta e 
manuale. Ma abbonarsi 
conviene; con 1 65.000 
lire avrai infatti il corso 
completo, a casa tua, e 5 splendidi 
(e pratici) raccoglitori del valore 
di 40.000 lire. 

NON PERDERE L'OCCASIONE! 


f Jf 


Desidero abbonarmi a Video Basic 

Q Per il computer Commodore VIC 20 

□ Per il computer Commodore 64 

□ Per il computer Sinclair Spectrum 



Spedire a: 
JACKSON 
Via Rosellini, 12 
20124 Milano 


Allego lire 165.000 con assegno n° della Banca . o allego fotocopia della ricevuta di 

versamento con vaglia postale intestato a GRUPPO EDITORIALE JACKSON - MILANO, che mi dà diritto di ricevere a casa 
mia il corso completo e 5 raccoglitori. 


Nome 


Cognome 


Via 


N. 


CAP Città 


Provincia 



3968 LET c$ =" MANTO VA" : LET k=2: 

LET qu=l: LET an=43: LET b 
n = l 20 : LET t$="MN": LET a$ = 
"60.866": LET v$="VERONA (3 
9 KM.)": LET l$="REGGIO CAL 
ABRIA (1227 KM.)": LET o$=" 
475 KM.": LET m$="151 KM." 

3976 RETURN 

3977 LET c$="MASSA E CARRARA": 

LET k= 8 : LET qu=l : LET an = 
37: LET bn=104: LET t$="MS" 
: LET a$="65.687": LET v$=" 
LA SPEZIA (35 KM.)": LET 1$ 
=" REGGIO CALABRIA (1134 KM. 
)": LET 0$ = " 376 KM.": LET m 
$="244 KM." 

4028 RETURN 

4029 LET c$=" LUCCA": LET k=8: 

LET qu=l : LET an=40: LET b 
n = l 02 : LET t$ = "LU" : LET a$ = 
"91.246": LET v$="PISA (22 
KM.)": LET 1$= "REGGIO CALAB 
RIA (1082 KM.)": LET o$="33 
5 KM.": LET m$=" 285 KM." 

4056 RETURN 

4057 LET c$="MESSINA" : LET k=18: 

LET qu=l : LET an=94: LET b 
n=24 : LET t$="ME": LET a$=" 
260.233": LET v$="CATANIA ( 
97 KM.)": LET 1$="TRAPANI ( 
360 KM. ) " : LET o$ = " " : 

LET m$ = " " 

4104 RETURN 

4105 LET c $ = " M I LANO " : LET k=2: 

LET qu=2 : LET an=27: LET b 
n = l 26 : LET t$ = "MI": LET a$ = 
"1.604.773": LETv$="PAVIA 
(35 KM.)": LET 1$=" REGGIO C 
ALABRIA (1310 KM.)": LET 0$ 
= "574 KM.": LET m$ = " 1,1 

4212 RETURN 

4213 LET c$="MODENA": LET k=7: 

LET qu=l : LET an=44: LET b 
n=l 1 3: LET t$ = "MO" : LET 
"180.312": LET v$="REGGIO E 
MILIA (28 KM.)": LET 1$="RE 
GGIO CALABRIA (1156 KM.)": 


LET o$=" 41 4 KM.": LET m$=" 
172 KM." 

4266 RETURN 

4267 LET c$="NAPOLI": LET k=14: 

LET qu=2 : LET an=80: LET b 
n=62 : LET t$="NA": LET a$ = " 
1.212.387": LET v$="CASERTA 

(30 KM.)": LET l$="AOSTA ( 
967 KM.)": LET o$="215 KM." 
: LET m$=" 784 KM." 

4544 RETURN 

4545 LET c$="NOVARA": LET k=0: 

LET qu=l : LET an=21 : LET b 
n= 1 24 : LET t$ = "NO": LET a$ = 
"102.086": LET v$=" VERCELLI 

(23 KM.)": LET l$="REGGIO 
CALABRIA (1367 KM.)": LET O 
$="625 KM.": LET m$="51 KM. 

n 

4667 RETURN 

4668 LET c$ = ,, NUORO": LET k=19: 

LET qu=l : LET an=27: LET b 
n=54 : LET t$="NU": LET a$=" 
35.779": LET v$="ORISTANO ( 
90 KM.)": LET 1$="CAGLIARI 

(202 KM. ) " : LET 0$ = " " 

: LET m$ = " " 

4842 RETURN 

4843 LET c$=" PADOVA": LET k=4: 

LET qu=l : LET an=54: LET b 
n = l 23 : LET t$ = "PD": LET a$ = 
"234.678": LET v$="VENEZIA 
(30 KM.)": LET 1$= "REGGIO C 
ALABRIA (1218 KM.)": LET o$ 
="501 KM.": LET m$=" 239 KM. 

Il 

4848 RETURN 

4849 LET C$="PALERMO" : LET k=18: 

LET qu=2 : LET an=70: LET b 
n=21 : LET t$=" PA" : LET a$=" 
701.782": LET v$="TRAPANI ( 
100 KM.)": LET 1$=" RAGUSA ( 
274 KM. ) " : LET o$ = " " : 

LET m$ = " " 

4868 RETURN 

4869 LET c$="PARMA": LET k=7: 

LET qu=l : LET an=38: LET b 
n = l 1 5 : LET t$ = "PR": LET a$ = 
"179.019": LET v$="REGGIO E 
MILIA (36 KM.)": LET 1$="RE 
GGIO CALABRIA (1202 KM.)": 

LET o$=" 460 KM.": LET m$=" 
124 KM." 

4872 RETURN 
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4873 LET c$="PAVIA" : LET k=2: 

LET qu=l : LET an=27: LET b 
n = 1 21 : LET t$ = "PV" : LET a$ = 
"85.029": LET v$="MILANO (3 
5 KM.)": LET 1$=" REGGIO CAL 
ABRIA (1308 KM.)": LET 0$=" 
566 KM.": LET m$="35 KM." 

4896 RETURN 

4897 LET c$="ORISTANO" : LET k=19 
: LET qu=l : LET an=19: 

LET bn=48 : LET t$="OR" : 

LET a$=" 29.424": LET v$ = "N 
UORO (90 KM.)": LET 1$="SAS 
SARI (118 KM.)": LET o$="-- 
" : LET m$ = " " 

4938 RETURN 

4939 LET c$ = " PESARO E URBINO": 

LET k=l 0 : LET qu=l : LET an 
= 64: LET bn = l 02 : LET t$ = "PS 
" : LET a$="90.41 2": LET v$= 
"ANCONA (60 KM.)": LET 1$=" 
REGGIO CALABRIA (983 KM.)": 

LET o$=" 302 KM.": LET m$ = " 
359 KM." 

4940 RETURN 

4941 LET c$ =" PESCARA" : LET k=12: 

LET qu=l : LET an=78: LET b 
n=83 : LET t$="PE": LET a$=" 
131.330": LET v$="CHIETI (1 
9 KM.)": LET l$="REGGIO CAL 
ABRIA (772 KM.)": LET 0$ = "2 
24 KM.": LET m$="570 KM." 

4956 RETURN 

4957 LET c$=" PERUGIA" : LET k=9: 

LET qu=2 : LET an=59: LET b 
n=92 : LET t$="PG": LET a$ = " 
142.348": LET v$="AREZZO (8 
0 KM.)": LET 1$ = " REGGIO CAL 
ABRIA (916 KM.)": LET o$ = "l 
74 KM . " : LET m$ = "4 56 KM." 

4984 RETURN 

4985 LET c$=" PI ACENZA" : LET k=7: 

LET qu=l : LET an=32: LET b 
n = l 1 8 : LET t$ = "PC" : LET a$ = 
"109.039": LET v$= "CREMONA 
(33 KM.)": LET l$="REGGIO C 
ALABRIA (1255 KM.)": LET 0$ 
="513 KM.": LET m$=" 65 KM." 

5018 RETURN 

5019 LET c$ = "PISA" : LET k=8: 

LET qu=l : LET an=39: LET b 
n = l 00 : LET t$ = "PI": LET a$ = 
"104.509": LET v$="LIVORNO 


(19 KM.)": LET l$="REGGIO C 
ALABRIA (1091 KM.)": LET 0$ 
="336 KM.": LET m$="287 KM. 

Il 

5037 RETURN 

5038 LET c$="PISTOIA" : LET k=8: 

LET qu=l : LET an=44: LET b 
n = l 03 : LET t$ = "PT" : LET a$ = 
"92.274": LET v$="FIRENZE ( 
37 KM.)": LET 1$= "REGGIO CA 
LABRI A (1054 KM.)": LET 0$= 
"312 KM.": LET m$=" 286 KM." 

5139 RETURN 

5140 LET c$ =" PORDENONE " : LET k=5 
: LET qu=l : LET an=62: 

LET bn = l 31 : LET t$ = "PN" : 
LET a$=" 52 . 094" : LET v$="U 
DINE (50 KM.)": LET 1$="REG 
GIO CALABRIA (1296 KM.)": 

LET o$=" 595 KM.": LET m$=" 
328 KM." 

5144 RETURN 

5145 LET c$ =" POTENZA" : LET k=16: 

LET qu=2 : LET an=97: LET b 
n=60 : LET t$="PZ" : LET a$=" 
64.358": LET V$="MATERA (98 
KM.)": LET 1$=" AOSTA (1082 
KM.)": LET 0$=" 384 KM.": 
LET ttl$ = " 899 KM." 

5454 RETURN 

5455 LET c$="RAGUSA": LET k=18: 

LET qu=l : LET an=87: LET b 
n=7 : LET t$="RG" : LET a$="6 
4.492": LET v$="SIRACUSA (7 
6 KM.)": LET 1$=" TRAPANI (3 

1 6 KM. ) " : LET o$ = " " : 

LET m$ = " " 

5468 RETURN 

5469 LET C$=" RAVENNA" : LET k=7: 

LET qu=l : LET an=54: LET b 
n = l 1 0 : LET t$ = "RA" : LET a$ = 
"138.034": LET v$="FORLI ' ( 

27 KM.)": LET l$="REGGIO CA 
LABRIA (1069 KM.)": LET 0$= 

"368 KM.": LET m$="287 KM." 

5506 RETURN 

5507 LET C$="REGGIO DI CALABRIA" 
: LET k=l 7 : LET qu=2: LET a 
n=98 : LET bn=24: LET t$="RC 
" : LET a$="l 73. 486" : LET v$ 
= "CATANZARO (167 KM.)": 

LET 1$=" AOSTA (1499 KM.)": 
LET o$=" 747 KM.": LET m$=" 
1316 KM." 
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5522 RETURN 

5523 LET C$="REGGIO NELL'EMILIA" 
: LET k=7 : LET qu=l : LET an 
= 41: LET bn = l 1 4 : LET t$ = "RE 
" : LET a$="l 30.376": LET v$ 
=" MODENA (28 KM . ) " : 'LET 1$= 
"REGGIO CALABRIA (1172 KM.) 
" : LET o$=" 430 KM.": LET m$ 

="150 KM." 

5609 RETURN 

5610 LET c$ = "RIETI" : LET k= 11: 

LET qu=l : LET an = 64: LET b 
n=82 : LET t$="RI": LET a$=" 
43.079": LET v$="TERNI (38 
KM.)": LET 1$= "REGGIO CALAB 
RIA (809 KM.)": LET O$="80 
KM.": LET m$=" 563 KM." 

5726 RETURN 

5727 LET C$="ROMA": LET k=ll: 

LET qu= 3 : LET an = 60: LET b 
n=75: LET t$="ROMA": LET a$ 
="2.840.259": LET v$="LATIN 
A (70 KM.)": LET 1$=" AOSTA 

(757 KM.)": LET o$ = " " 

: LET m$=" 574 KM." 

5748 RETURN 

5749 LET c$="SALERNO" : LET k=14: 

LET qu=l : LET an=87: LET b 
n=59 : LET t$="SA": LET a$=" 
157.385": LET v$="AVELLINO 
(34 KM.)": LET 1$=" AOSTA (1 
022 KM.)": LET o$="270 KM." 

: LET m$=" 839 KM." 

5752 RETURN 

5753 LET c$="ROVIGO" : LET k=4: 

LET qu=l : LET an=52: LET b 
n = l 1 9 : LET t$ = "RO": LET a$ = 
"52.218": LET v$=" FERRARA ( 
34 KM.)": LET l$="REGGIO CA 
LABRIA (1177 KM.)": LET 0$= 
"460 KM.": LET m$="242 KM." 

5776 RETURN 

5777 LET c$="SASSARI" : LET k=19: 

LET qu=l : LET an=18: LET b 
n=59 : LET t$="SS": LET a$=" 
119.596": LET v$="ORISTANO 
(118 KM.)": LET 1$="CAGLIAR 

I (215 KM. ) " : LET o$=" 

-": LET m$ = " " 

5778 RETURN 

5^779 LET c$=" SAVONA": LET k=6: 

LET qu=l : LET an=19: LET b 
n = l 09 : LET t$ = "SV" : LET a$ = 
"75.353": LET v$="GENOVA (4 



6 KM.)": LET 1$=" REGGIO CAL 
ABRIA (1327 KM.)": LET o$=" 
572 KM.": LET m$="183 KM." 

5903 RETURN 

5904 LET c$="SIENA": LET k=8: 

LET qu=l : LET an=48: LET b 
n=94 : LET t$="SI": LET a$=" 
61.989": LET v$="AREZZO (65 

KM.)": LET 1$= "REGGIO CALA 
BRIA (979 KM.)": LET o$="23 
2 KM.": LET m$="372 KM." 

5916 RETURN 

5917 LET c$="SIRACUSA" : LET k=18 
: LET qu=l : LET an=92 : 

LET bn=9 : LET t$="SR": 

LET a$=" 117.615": LET v$=" 
CATANIA (58 KM.)": LET 1$=" 
TRAPANI (392 KM.)": LET 0$= 
•' LET m$ = " " 

6031 RETURN 

6032 LET c$=" SONDRIO" : LET k=2: 

LET qu=l : LET an=34: LET b 
n = l 34 : LET t$ = "SO": LET a$ = 
"22.747": LET v$="COMO (102 

KM.)": LET l$="REGGIO CALA 
BRIA (1448 KM.)": LET 0$="6 
98 KM.": LET m$="136 KM." 

6056 RETURN 

6057 LET c $ = " TARANTO " : LET k=15: 

LET qu=l : LET an=113: 

LET bn=58 : LET t$="TA" : 

LET a$="244 . 1 01 " : LET v$=" 
BRINDISI (69 KM.)": LET 1$= 
"AOSTA (1160 KM.)": LET 0$= 
"547 KM.": LET m$="977 KM." 

6136 RETURN 

6137 LET c $ = " TERAMO " : LET k=12: 

LET qu= 1 : LET an = 73: LET b 
n=86 : LET t$="TE": LET a$=" 
51.092": LET v$="ASCOLI PIC 
ENO (36 KM.)": LET 1$="REGG 
IO CALABRIA (835 KM.)": 

LET o$=" 21 4 KM.": LET m$=" 
557 KM." 

6149 RETURN 
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6150 LET c$ = " TERN I " : LET k = 9: 

LET qu=l : LET an=62: LET b 
n=85 : LET t$="TR": LET a$=" 
253.912": LET v$="RIETI (38 
KM.)": LET l$="REGGIO CALA 
BRIA (839 KM.)": LET o$="97 
KM.": LET m$=" 525 KM." 

6344 RETURN 

6345 LET c$="TORINO" : LET k=0: 

LET qu=2 : LET an=12: LET b 
n = l 20 : LET t$="TO" : LET a$ = 
"1.117.154": LET v$="ASTI ( 
51 KM.)": LET 1$= "REGGIO CA 

LABRIA (1442 KM.)": LET 0 $= 
"700 KM.": LET m$="140 KM." 

6347 RETURN 

6348 LET c$="TRENTO" : LET k=3: 

LET qu=2 : LET an=46: LET b 
n = l 33 : LET t$="TN": LET a$ = 
"99.179": LET v$="BOLZANO ( 
58 KM.)": LET l$="REGGIO CA 
LABRIA (1341 KM.)": LET o$ = 

"591 KM.": LET m$="214 KM." 

6377 RETURN 

6378 LET c$="TRAPANI" : LET k=18: 

LET qu=l : LET an=63: LET b 
n=21 : LET t$="TP" : LET a$=" 
71.927": LET v$=" PALERMO (1 
00 KM.)": LET 1$=" SIRACUSA 

(392 KM. ) " : LET o$ = " " 

: LET m$ = " " 

6382 RETURN 

6383 LET c$="TRIESTE" : LET k=5: 

LET qu-1 : LET an=73: LET b 
n = l 28 : LET t$ = "TS": LET a$ = 
"252.369": LET v$="GORIZIA 
(43 KM.)": LET 1$= "REGGIO C 
ALABRIA (1365 KM.)": LET 0$ 
="664 KM.": LET m$="417 KM. 

Il 

6391 RETURN 

6392 LET c$="TREVISO" : LET k=4: 

LET qu=l : LET an = 58: LET b 
n-1 27 : LET t$ = "TV": LET a$ = 
"87.696": LET v$="VENEZIA ( 
30 KM.)": LET 1$ = " REGGIO CA 
LABRIA (1238 KM.)": LET 0$ = 
"537 KM.": LET m$="270 KM." 

6411 RETURN 

6412 LET c$="UDINE" : LET k=5: 

LET qu=2 : LET an=67: LET b 
n = l 33 : LET t$ = "UD": LET a$ = 
"102.021": LET v$="GORI ZIA 


(37 KM.)": LET l$="REGGIO C 
ALABRIA (1328 KM.)": LET o$ 
="627 KM.": LET m$="370 KM. 

Il 

6660 RETURN 

6661 LET c$=" VARESE" : LET k=2: 

LET qu =, l : LET an = 23: LET b 
n=130: LET t$="VA": LET a$= 
"90.527": LET v$="COMO (27 
KM.)": LET l$="REGGIO CALAB 
RIA (1373 KM.)": LET o$="63 

I KM.": LET m$=" 57 KM." 

6732 RETURN 

6733 LET c$="VENEZIA" : LET k=4: 

LET qu=2 : LET an=58: LET b 
n=l 24 : LET t$ = "VE": LET a$ = 
"346.146": LET v$="TREVISO 
(30 KM.)": LET 1$= "REGGIO C 
ALABRIA (1218 KM.)": LET 0 $ 
= "517 KM.": LET tn$ = "272 KM. 

II 

6738 RETURN 

6739 LET c$ = "VERCELLI " : LET k=0: 

LET qu=l : LET an=18: LET b 
n = l 23 : LET t$ = "VC": LET a$ = 
"52.480": LET v$="NOVARA (2 
3 KM*)": LET l$="REGGIO CAL 
ABRIA (1377 KM.)": LET 0$=" 
635 KM.": LET m$="74 KM." 

6750 RETURN 

6751 LET c$="VERONA": LET k=4: 

LET qu=l : LET an=46: LET b 
n=l 24 : LET t$ = "VR" : LET a$ = 
"265.932": LET v$= "MANTOVA 
(39 KM.)": LET l$="REGGIO C 
ALABRIA (1249 KM.)": LET 0$ 
="499 KM.": LET m$="162 KM. 

Il 

6790 RETURN 

6791 LET c$="VICENZA" : LET k=4: 

LET qu=l : LET an=50: LET b 
n = l 26 : LET t$ = "VI": LET a$ = 
"114.598": LET v$="PADOVA ( 
34 KM.)": LET l$="REGGIO CA 
LABRIA (1252 KM.)": LET o$= 
"535 KM.": LET m$="209 KM." 

6824 RETURN 

6825 LET c$ = " VITERBO" : LET k=H: 

LET qu=l : LET an=56: LET b 
n=83 : LET t$="VT": LET a$=" 
57.632": LET v$="TERNI (60 
KM.)": LET 1$=" REGGIO CALAB 
RIA (828 KM.)": LET o$="81 
KM.": LET m$=" 509 KM." 
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6849 RETURN 

6860 LET z = 2: LET xx=3: LET yy=l 
61 

6861 DIM a (4) : GO TO 300 

6901 DIM i ( 4 ) : IF POINT (an+3,bn 
+ 1 ) =0 THEN LET i (1 ) =1 

6902 IF POINT (an+4 , bn+2) =0 

THEN LET i ( 2 ) = 1 
690T3 IF POINT (an + 5 , bn+1 ) =0 
THEN LET i ( 3 ) = 1 
6904 IF POINT (an+4,bn)=0 THEN 
LET i ( 4 ) =1 

6910 LET d=CODE INKEY$ : IF d 
<>0 THEN GO TO 6950 

6911 OVER 1: PLOT an+3,bn+l: 

DRAW 1,1: DRAW 1,-1: 

DRAW -1,-1 

6912 PAUSE 5: PAUSE 3: OVER 0: 

PLOT an+3 , bn+1 : DRAW 1,1: 
DRAW 1,-1: DRAW -1,-1 


6920 

BEEP .013, 

10: PAUSE 2: 


PAUSE 3: 

GO TO 

691 0 

6950 

OVER 1 : IF 

id) 

=1 THEN 


PLOT an+3 

,bn+l 


6951 

IF i (2) =1 

THEN 

PLOT an+4,b 


n+2 



6952 

IF i (3) =1 

THEN 

PLOT an+5,b 


n+1 



6953 

IF i (4) =1 
n 

THEN 

PLOT an+4,b 

6954 

OVER 0: RETURN 


701 0 

LET C$=" 





H • 

• 

LET e$="FER 


MA IL NASTROPER LE ISTRUZIO 
NI D'USO CONSULTARE LA DOCU 
MENTAZIONE ORIGINALE" 

7011 LET p$="CODICE CITTA' :REGIO 

NE QUALIFICHE: TARGA AUTOMOB 
ILISTICA: POPOLAZIONE RESIDE 
NTE: CITTA' PIU' VICINA:CI 

TTA ' PIU' LONTANA: DISTANZA 
DA ROMA: DI STANZA DA MILANO: 

•I 

7012 LET q$= "CAPOLUOGO DI PROVIN 
CI ACAPO LUOGO DI REGIONECAPI 
TALE D'ITALIA" 

7013 LET d$=" { G5 } { 6G3} 

{ 6G3 } { SG5 } {Gl } 

{ 4G3 } 

{ 4G3 } {G2 } " 

7015 LET w$=" 

: RETURN 

7100 LET r $=" PIEMONTE" : RETURN 



7101 LET r$=" VALLE D'AOSTA": 

RETURN 

7102 LET r $ = " LOMBARD I A " : 

RETURN 

7103 LET r$= "TRENTINO -ALTO ADIGE 
": RETURN 

7104 LET r$= "VENETO" : RETURN 

7105 LET r$="FRIULI-VENEZIA GIUL 
IA" : RETURN 

7106 LET r$="LIGURIA" : RETURN 

7107 LET r$="EMILIA-ROMAGNA" : 

RETURN 

7108 LET r$= "TOSCANA" : RETURN 

7109 LET r$="UMBRIA": RETURN 

7110 LET r$="MARCHE": RETURN 

7111 LET r$=" LAZIO" : RETURN 

7112 LET r $ = " ABRU ZZI": RETURN 

7113 LET r $="MOLISE" : RETURN 

7114 LET r$="CAMPANIA" : RETURN 

7115 LET r $=" PUGLIA" : RETURN 

7116 LET r$="BASILICATA" : 

RETURN 

7117 LET r$="CALABRIA" : RETURN 

7118 LET r$=" SICILIA" : RETURN 

7119 LET r $=" SARDEGNA" : RETURN 

7510 PRINT # 0 ; AT 0,0; INK 6 ;d$; 
AT 0,8; INK 2;"CITTA' D'IT 
ALIA" ; AT 1,6; INK 1;"® 1984 
by DI SCOVOGUE" 

7520 FOR n=10 TO 40 STEP 10: 

BEEP . 1 ,n: NEXT n: 

RETURN 

7610 LET z=6 : LET xx=60: LET yy= 

88 

7615 INK 2: FOR n=l TO 15: 

GO SUB 9900+CODE e$ (n) : 

LET xx=xx+10: BEEP .01,50: 
NEXT n 

7616 FOR n=l TO 10: PRINT AT 9,7 
; OVER 1; INK z;w$;AT 10,7; 
w$: FOR s=l TO 4: BEEP .009 
,47: NEXT s: LET z=9-z: 

PAUSE 3: NEXT n: PAUSE 30: 
PRINT AT 9 , 7 ; w$ ; AT 10,7;w$ 
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7617 LET xx= 7 : INK 1: FOR n = 16 

TO 77: GO SUB 9800+CODE e$ 
(n) : LET xx=xx+4 : BEEP .003 
,10: NEXT n 

7699 RETURN 

8010 DATA 42,169,8,14,42,161,15, 
22,1 44,1 45,23,33,1 44, 1 1 3,34 
,55,1 44,97,56,77,1 44,81 ,80, 
98,1 44,65,99,1 1 8,144,49,1 1 9 
,1 35,1 44,33,1 36,1 54 

8011 LET z=l : INK 7: LET xx=6: 

LET yy=l 70 : FOR n = l TO 7: 

GO SUB 9800+CODE p$ (n) : 

LET xx=xx+4: NEXT n 

8012 RESTORE 8010: FOR m=l TO 9: 

READ xx : READ yy : READ i : 

READ f: FOR n=i TO f: 

GO SUB 9800+CODE p$ (n) : 

LET xx=xx+4 

8015 LET z=5- z : PRINT AT 10,0; 

OVER 1; INK z;c$ : BEEP .00 
1 ,65 

8020 NEXT n: NEXT m 

8099 PRINT AT 10,0;c$: INK 0: 

FOR n=l TO 20: PRINT AT n, 
0 ; w$ : NEXT n: RETURN 

9651 FOR n=l TO 22: GO SUB 9800+ 
CODE q$ (n) : BEEP .05,yy/3: 

LET xx=xx+4: NEXT n: 

RETURN 

9652 FOR n=23 TO 42: GO SUB 9800 
+CODE q$ (n) : BEEP .05,yy/3: 

LET xx=xx+4: NEXT n: 

RETURN 

9653 FOR n=43 TO 59: GO SUB 9800 
+CODE q$ (n) : BEEP .05,yy/3: 

LET xx=xx+4: NEXT n: 

RETURN 

9710 PLOT x+3 ,y+l 30 : DRAW 1,0: 

DRAW 1,1: DRAW 4,0: DRAW 1 
, 1 : DRAW 2,0: DRAW 1,-1: 

DRAW 1,1: DRAW 1,0: DRAW 2 
, 2 : DRAW 0,1: DRAW -1,1: 

DRAW 1,1: DRAW 1,0: DRAW 1 
, 1 : DRAW 1 , 0 

9711 DRAW 0,-2: DRAW 1,-1: 

DRAW 0,-1: DRAW 2,0: 

DRAW 0,-2: DRAW 1,0: 

DRAW 0,-1: DRAW 1,-1: 

DRAW 1,1: DRAW 0,1: DRAW - 
1,1: DRAW 3,3: DRAW 0,3: 

DRAW 1,0: DRAW 1,-1: 

DRAW 0,-1: DRAW 1,-1: 

DRAW 1,0: DRAW 0,1: DRAW 2 


,0: DRAW 2,-2 

9712 DRAW 1,1: DRAW 0,1: DRAW -1 
, 1 : DRAW 0,2: DRAW 3,0: 

DRAW 0,2: DRAW 2,2: DRAW 2 
,0: DRAW 1,-1: DRAW 1,0: 
DRAW 2,2: DRAW 1,0: DRAW 2 
,2: DRAW 1,-1: DRAW 3,0: 
DRAW 1,1: DRAW 2,0: DRAW 0 
, - 1 : DRAW -1,-1: DRAW 4,-4: 
DRAW 3,0 

9713 DRAW 1,-1: DRAW 5,0: DRAW 1 
, - 1 : DRAW 1,0: DRAW 0,-1: 

DRAW -1,-1: DRAW -1,0: 

DRAW 0,-2: DRAW 1,0: 

DRAW 1,-1: DRAW -1,-1: 

DRAW 0,-1: DRAW 1,-1: 

DRAW 0,-1: DRAW 1,-1: 

DRAW 1,0: DRAW 1,-1: 

DRAW -1,-1: DRAW -1,0: 

DRAW -1,1 

9714 DRAW -4,0: DRAW -1,-1: 

DRAW -2,0: DRAW -1,-1: 

DRAW -1,0: DRAW 0,-1: 

DRAW -1,0: DRAW -1,-1: 

DRAW -1,1: DRAW -1,0: 

DRAW -1,-1: DRAW 0,-3: 

DRAW 1,0: DRAW 0,-2:' 

DRAW 1,0: DRAW 1,-1: 

DRAW 0,-2 


DRAW - 

2,0: DRAW 0 

: 

DRAW 

-1,0: DRAW 

0,-1 
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1,-1: DRAW 

0,-4 
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1,-1: DRAW 

0,-1 
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1,0: DRAW 0 

,-l : 
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2,-2: DRAW 

2,0: 
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4,-4: DRAW 

1,0: 
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1,-1: DRAW 

1 ,0: 
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1,-1: DRAW 

0,-1 
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1,-1: DRAW 

0,-1 
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1,-1: DRAW 

0,-1 
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1,-1: DRAW 

0,-3 


9716 DRAW 1,0: DRAW 0,-2: DRAW 1 
, 0 : DRAW 0,-1: DRAW 1,-1: 

DRAW 0,-1: DRAW 3,-3: 

DRAW 1,0: DRAW 1,-1: 

DRAW 1,0: DRAW 0,-2: 

DRAW 2,0: DRAW 1,-1: 

DRAW 1,0: DRAW 1,-1: 

DRAW 6,0: DRAW 1,1: DRAW 3 

,0 

9717 DRAW 1,-1: DRAW 0,-1: 

DRAW -3,-3: DRAW 1,-1: 

DRAW 0,-1: DRAW 1,0: 

DRAW 1,-1: DRAW 2,0: 
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DRAW 2 ,- 2 : DRAW 3,0: 

DRAW 1,-1: DRAW 2,0: 
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DRAW 1,-1: DRAW 2,0: 

DRAW 5,-5: DRAW 0,-1 : 

DRAW 1,-1 

9718 DRAW 0,-2: DRAW -1,-1: 

DRAW 0,-2: DRAW -1,0: 

DRAW -2,2: DRAW -1,0: 

DRAW 0,2: DRAW -3,3: 
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DRAW -1,-1: DRAW -1,0: 

DRAW -2,-2: DRAW 0,-2: 

DRAW -1,-1: DRAW 0,-4: 

DRAW -1,-1 
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DRAW 2,0: DRAW 1,-1: 
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DRAW -1,1: DRAW -2,0: 

DRAW -3,-3: DRAW 0,-2: 
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DRAW -2,-2: DRAW -1,0: 

DRAW -1,-1: DRAW 0,-1: 

DRAW -1,-1: DRAW 0,-2: 

DRAW -1,-1: DRAW -3,0 

9720 DRAW -1,1: DRAW 0,3: DRAW 1 
, 1 : DRAW 0,1: DRAW 2,2: 

DRAW 0,1: DRAW -1,1: 

DRAW 0,1: DRAW 1,1: DRAW 2 
, 0 : DRAW 0,3: DRAW -1,1: 
DRAW 0,1: DRAW -1,1: 

DRAW 0,3: DRAW -2,2: 

DRAW 0,2: DRAW -1,1: 

DRAW 0,1: DRAW -1,1: 

DRAW 0,1: DRAW -1,1: 

DRAW -1,0: DRAW -1,-1: 

DRAW -1,0 


9721 DRAW -2,2: DRAW -1,0 
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DRAW -1,1: DRAW -2,0: 

DRAW 0,2: DRAW 1,0: DRAW 1 
, 1 : DRAW 0 , 2 

9724 DRAW -4,0: DRAW -1,1: 

DRAW -1,0: DRAW -1,1: 

DRAW 0,1; DRAW -1,1: 
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,0: DRAW 0,2: DRAW -2,2: 
DRAW -1,0: DRAW 0,1: 

DRAW -1,1: DRAW 0,1: 

DRAW 3,0: DRAW 0,2: DRAW 2 
, 0 : DRAW 0,2: DRAW -1,0: 
DRAW 0,1 

9725 DRAW -1,1: DRAW 0,1: DRAW - 
1,1: PLOT x+36 ,y+87 : DRAW 1 
, 0 : DRAW 1,1: DRAW 1,0: 

DRAW 0, -1 : DRAW -1,-1 


9726 PLOT x+96 , y+26 : DRAW -1,-1: 
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1 
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9727 DRAW -5,0: DRAW -1,1: 

DRAW -2,0: DRAW -1,1: 

DRAW 0,1: DRAW -1,1: 

DRAW -3,0: DRAW -1,1: 

DRAW -2,0: DRAW -2,2: 

DRAW -2,0: DRAW 0,1: 

DRAW -1,0: DRAW -2,2: 

DRAW -2,0: DRAW -1,1: 

DRAW -3,0 

9728 DRAW 0,1: DRAW -2,0: DRAW - 
1,1: DRAW 1,1: DRAW 0,3: 
DRAW 2,2: DRAW 1,0: DRAW 0 

, -1 : DRAW 1,-1: DRAW 1,0: 
DRAW 2,2: DRAW 3,0: DRAW 1 
,-l : DRAW 1,0: DRAW 1,-1: 
DRAW 3,0: DRAW 1,1: DRAW 6 
, 0 : DRAW 1,1: DRAW 1,0: 
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, - 1 : DRAW 2,2: DRAW 1,0: 
DRAW 1,1: DRAW 1 , 0 

9729 PLOT x+1 5,y+63: DRAW 0,-2: 
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, 0 : DRAW 0,1: DRAW 2,2: 
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,0: DRAW 1,-1: DRAW 1,0: 
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DRAW 0, -1 : DRAW 1,-1: 

DRAW 0,-1 
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DRAW 1,-1: DRAW 0,-1 : 
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DRAW -1,-1: DRAW 0,-1: 

DRAW 1,-1: DRAW -1,-1: 
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, 1 : DRAW 0,1: DRAW 1,1: 

DRAW 0,2: DRAW -1,0: 

DRAW -1,1: DRAW 0,1: 

DRAW 1,1: DRAW 0 , 3 

9732 DRAW -1,1: DRAW 0,2: DRAW - 
1,0: DRAW -1,1: DRAW 0,3: 

PLOT x+15,y+35: DRAW 0,1 
9749 RETURN 

9760 OVER 0: PLOT x+7,y+125: 
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9762 PLOT x+28 , y+11 6 : DRAW 0,2: 
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DRAW 1,1: DRAW -1,1: 

PLOT x+4 4 , y+1 2 8 : DRAW 2,0: 
DRAW 2,2: DRAW 1,0: DRAW 0 
, 1 : DRAW 1,0: DRAW 4,4: 

DRAW 0,4: DRAW 1,0: DRAW 1 
, 1 : DRAW 1,0: DRAW 1 , 1 

9764 PLOT x+65 , y+1 28 : DRAW 0,1: 

DRAW -1,1: DRAW -3,0: 

DRAW -1,1: DRAW 0,1: 

DRAW -1,1: DRAW 0,1: 

DRAW -1,1: DRAW 0,1: 

DRAW 2,2: DRAW 1,0: DRAW 1 
,1: DRAW 0,1: PLOT x+49,y+l 
1 7 : DRAW 4,0: DRAW 1,1: 

DRAW 1,0: DRAW 1,-1: 

DRAW 2,0 

9765 PLOT x+32 , y+1 1 0 : DRAW 1,1: 

DRAW 1,0: DRAW 1,-1: 

DRAW 0,-1: DRAW 1,0: 

DRAW 0,-1: DRAW 3,0; 

DRAW 0,-1: DRAW 1,0: 

DRAW 0,-1: DRAW 2,0: 

DRAW 0,-1: DRAW 5,0: 
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DRAW 0,1: DRAW 1,0: DRAW 1 
,1 : DRAW 1,-1: DRAW 1,0: 

DRAW 0,-2: DRAW 3,-3: 

DRAW 2,0: DRAW 0,1: DRAW 1 
, 0 : DRAW 2,2: DRAW 1 , 0 

9766 PLOT x+50 ,y+83 : DRAW 0,1: 

DRAW 1,1: DRAW 1,0: DRAW 0 
, 2 : DRAW 1,1: DRAW 1,0: 

DRAW 1,1: DRAW 0,2: DRAW - 
1,1: DRAW 2,2: DRAW 1,0: 

DRAW 0,2: DRAW -1,1: 

DRAW 2,2: DRAW -1,1: 

DRAW 3,-3 

9767 DRAW 2,0: DRAW 1,-1: DRAW 0 
,-l: DRAW 1,-1: DRAW 0,-3: 

DRAW 1,-1: DRAW 0,-1: 

DRAW 2,0: DRAW 1,-1: 

DRAW 0,-1: DRAW 1,0: 

DRAW 1,-1: DRAW 2,2: 

DRAW 1,0: DRAW 1,1: PLOT x 
+54 , y+87 : DRAW 2,-2: DRAW 1 
,0: DRAW 3,-3: DRAW 2,2: 

DRAW 1,0: DRAW 1,1: DRAW 2 
, 0 : DRAW 1 , 1 

9768 DRAW 1,1: DRAW 1,0: DRAW 1, 
- 1 : DRAW -1,-1: DRAW -1,0: 


DRAW 

-1 ,-l 

: DRAW 

0,-1 

DRAW 

1,-1 : 

DRAW 

0,-1 : 

DRAW 

1 ,-l : 

DRAW 

0,-1 : 

DRAW 

-2,0: 

DRAW 

-1,-1 

DRAW 

0,-1 : 

DRAW 

2,0: 

DRAW 

0,-1 : 

DRAW 

1,0: 

DRAW 

3,-3: 

DRAW 

1 ri : 

DRAW 

1 ,0: 

DRAW 2 

, -2 : 

DRAW 

1 ri 




9769 DRAW 1,0: DRAW 0,1: DRAW 2, 
2: DRAW 1,-1: DRAW 1,0: 

DRAW 1,1: DRAW 0,1: PLOT x 
+75,y+67: DRAW 0,1: DRAW 1, 
1 : DRAW 0,2: DRAW 0,-2: 

DRAW 1,0: DRAW 1,1: DRAW 1 
, 0 : DRAW 1,-1: DRAW 4,0: 

DRAW 1,1: DRAW 2,0: DRAW 0 
, 1 : DRAW 1,1: DRAW 0 , 3 

9770 PLOT x+88 , y+69 : DRAW 0,-1: 

DRAW 2,0: DRAW 0,-2: 

DRAW 1,-1: DRAW 5,0: 

DRAW 1,1: DRAW 1,-1: 

DRAW 0,-1: DRAW 2,-2: 

DRAW 1,0: DRAW 2,-2: 

DRAW 1,1: DRAW 1,0: DRAW 1 
, -1 : DRAW 0,-1: DRAW 1,-1 



9771 PLOT x+93 , y+64 : DRAW 0,-1: 
DRAW - 1 , - 1 : DRAW 0,-2: 
DRAW 2,-2: DRAW 0,-1: 

DRAW 2,-2: DRAW 0,-1: 

DRAW 1,-1: DRAW -2,-2: 
DRAW 1,-1: DRAW 3,0: 

DRAW 1,-1: DRAW 1,0: 

DRAW 1,1: DRAW 1,-1: 

DRAW 1,1: DRAW 0,1: DRAW 1 

/I 

9799 RETURN 
9832 RETURN 

9839 PLOT xx+1 ,yy+4 : DRAW -1,-1: 

RETURN 

9840 PLOT xx+1 ,yy: DRAW -1,1: 

DRAW 0,2: DRAW 1,1: 

RETURN 

9841 PLOT xx+1 ,yy: DRAW 1,1: 

DRAW 0,2: DRAW -1,1: 

RETURN 

9842 PLOT xx+l,yy: LET xx=xx-l : 

RETURN 

9844 LET xx=xx+l : PLOT xx+1 ,yy+l 
: DRAW -1,-1: LET xx=xx+2: 

RETURN 

9845 PLOT xx , yy+2 : DRAW 2,0: 

RETURN 

9846 PLOT xx+1 ,yy: RETURN 

9848 PLOT xx,yy+l : DRAW 0,2: 

DRAW 1,1: DRAW 1,-1: 

DRAW 0,-2: DRAW -1,-1: 
RETURN 

9849 PLOT xx, yy: DRAW 2,0: 

DRAW -1,0: DRAW 0,4: 

DRAW -1,-1: RETURN 

9850 PLOT xx+2 , yy : DRAW -2,0: 

DRAW 0,1: DRAW 2,2: DRAW - 
1,1: DRAW -1,0: RETURN 

9851 PLOT xx, yy: DRAW 1,0: 

DRAW 1,1: DRAW -1,1: 

DRAW 1,1: DRAW -1,1: 

DRAW -1,0: RETURN 

9852 PLOT xx+2 , yy : DRAW 0,4: 

DRAW -2,-2: DRAW 0,-1: 

DRAW 1,0: RETURN 


SUPERSINC® 1/85 43 


9853 PLOT xx , yy : DRAW 1,0: 

DRAW 1,1: DRAW -1,1: 

DRAW -1,0: DRAW 0,2: 

DRAW 2,0: RETURN 

9854 PLOT xx+1 ,yy+2: DRAW 1,-1: 

DRAW -1,-1: DRAW -1,1: 

DRAW 0,2:: DRAW 1,1: 

DRAW 1,0: RETURN 

9855 PLOT xx, yy: DRAW 1,1: 

DRAW 0,1: DRAW 1,1: DRAW 0 
,1: DRAW -2,0: RETURN 

9856 PLOT xx,yy+l : DRAW 1,-1: 

DRAW 1,1: DRAW -2,2: 

DRAW 1,1: DRAW 1,-1: 

RETURN 

9857 PLOT xx, yy: DRAW 1,0: 

DRAW 1,1: DRAW 0,2:: 

DRAW -1,1: DRAW -1,-1: 

DRAW 1,-1: RETURN 

9858 PLOT xx+1 ,yy: PLOT xx+1 ,yy+ 
2: RETURN 

9865 PLOT xx, yy: DRAW 0,3: 

DRAW 1,1: DRAW 1,-1: 

DRAW -1,-1: DRAW 1,0: 

DRAW 0,-2: RETURN 

9866 PLOT xx, yy: DRAW 0,4: 

DRAW 1,0: DRAW 1,-1: 

DRAW -1,-1: DRAW 1,-1: 

DRAW -1,-1: RETURN 

9867 PLOT xx+2 ,yy : DRAW -1,0: 

DRAW -1,1: DRAW 0,2: 

DRAW 1,1: DRAW 1,0: 

RETURN 

9868 PLOT xx, yy: DRAW 0,4: 

DRAW 1,0: DRAW 1,-1: 

DRAW 0,-2: DRAW -1,-1: 
RETURN 

9869 PLOT xx+2 , yy : DRAW -2,0: 

DRAW 0,2: DRAW 2,0: DRAW - 
2,0: DRAW 0,2: DRAW 2,0: 
RETURN 

9870 PLOT xx, yy: DRAW 0,2: 

DRAW 2,0: DRAW -2,0: 

DRAW 0,2: DRAW 2,0: 

RETURN 

9871 PLOT xx+2,yy+2: DRAW 0,-2: 

DRAW -1,0: DRAW -1,1: 

DRAW 0,2: DRAW 1,1: DRAW 1 
,0: RETURN 

9872 PLOT xx, yy: DRAW 0,4: 

DRAW 0,-2: DRAW 2,0: 

DRAW 0,2: DRAW 0,-4: 

RETURN 


9873 PLOT xx, yy: DRAW 0,4: LET x 
x=xx- 2 : RETURN 

9875 PLOT xx, yy: DRAW 0,4: 

PLOT xx+l,yy+2: DRAW 2,2: 
DRAW -2,-2: DRAW 2,-2: 

LET xx=xx+l : RETURN 

9876 PLOT xx+2 ,yy : DRAW -2,0: 

DRAW 0,4: RETURN 

9877 PLOT xx, yy: DRAW 0,3: 

DRAW 1,1: DRAW 1,-1: 

DRAW 1,1: DRAW 1,-1: 

DRAW 0,-3: LET xx=xx+2: 
RETURN 

9878 PLOT xx, yy: DRAW 0,4: 

DRAW 1,0: DRAW 1,-1: 

DRAW 0,-3: RETURN 

9879 PLOT xx+1 ,yy: DRAW 1,0: 

DRAW 1,1: DRAW 0,2: DRAW - 
1,1: DRAW -1,-0: DRAW -1,-1 
: DRAW 0,-2: LET xx=xx+l : 
RETURN 

9880 PLOT xx, yy: DRAW 0,4: 

DRAW 1,0: DRAW 1,-1: 

DRAW -1,-1: RETURN 

9881 PLOT xx+1 ,yy: DRAW -1,1: 

DRAW 0,2: DRAW 1,1: DRAW 1 
, 0 : DRAW 1,-1: DRAW 0,-1: 
DRAW -1,-1: DRAW 1,-1: 

LET xx=xx+l : RETURN 

9882 PLOT xx, yy: DRAW 0,4: 

DRAW 1,0: DRAW 1,-1: 1 

DRAW -1,-1: DRAW 1,-1: 

DRAW 0,-1: RETURN 

9883 PLOT xx, yy: DRAW 1,0: 

DRAW 1,1: DRAW -2,2: 

DRAW 1,1: DRAW 1,0: 

RETURN 

9884 PLOT xx , yy+4 : DRAW 1,0: 

DRAW 0,-4: DRAW 0,4: 

DRAW 1,0: RETURN 

9885 PLOT xx, yy+4: DRAW 0,-4: 

DRAW 2,0: DRAW 0,4: 

RETURN 

9886 PLOT xx, yy+4: DRAW 0,-3: 

DRAW 1,-1: DRAW 1,1: 

DRAW 0,3: RETURN 
9890 PLOT xx, yy+4: DRAW 2,0: 

DRAW 0,-1: DRAW -2,-2: 

DRAW 0, -1 : DRAW 2,0:- 
RETURN 

9932 LET xx=xx-2: RETURN 
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9965 PLOT xx, yy: DRAW 0,7: 

DRAW 5,0: DRAW -5,0: 

DRAW 0,8: DRAW 5,0: DRAW 0 
,-15: RETURN 

9969 PLOT xx+5,yy: DRAW -5,0: 

DRAW 0,7: DRAW 5,0: DRAW - 
5,0: DRAW 0,8: DRAW 5,0: 
RETURN 

9970 PLOT xx, yy: DRAW 0,7: 

DRAW 5,0: DRAW -5,0: 

DRAW 0,8: DRAW 5,0: 

RETURN 


9973 

PLOT xx, yy: 

DRAW 0,15: 


LET xx=xx- ■ 

4 : RETURN 

9976 

PLOT xx+5,yy: DRAW -5,0 


DRAW 0,15: 

RETURN 

9977 

PLOT xx, yy: 

DRAW 0,15: 


DRAW 2,-8: 

DRAW 3,8: 


DRAW 0,-15 

: RETURN 

9978 

PLOT xx, yy: 

DRAW 0,15: 


DRAW 5,-15 

: DRAW 0,15: 


RETURN 


9979 

PLOT xx, yy: 

DRAW 5,0: 


DRAW 0,15: 

DRAW -5,0: 


DRAW 0,-15 

: RETURN 

9982 

PLOT xx, yy: 

DRAW 0,15: 


DRAW 5,0: 

DRAW 0,-8: 


DRAW -5,0: 

DRAW 5,-7: 


RETURN 


9983 

PLOT xx, yy: 

DRAW 5,0: 


DRAW 0,7: DRAW -5,0: 
DRAW 0,8: DRAW 5,0: 


RETURN 

9984 PLOT xx+3,yy: DRAW 0,15: 

DRAW -3,0: DRAW 5,0: 
RETURN 

9985 PLOT xx,yy+l 5: DRAW 0,-15: 

DRAW 5,0: DRAW 0,15: 
RETURN 

9990 PLOT xx,yy+15: DRAW 5,0: 
DRAW -5,-15: DRAW 5,0: 
RETURN 
9999 RETURN 


Per ricevere la cassetta contenente 
i programmi di SUPERSINC 
compilate e spedite il coupon qui sotto! 
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Scritto in BASIC e in linguaggio 
macchina, vi presentiamo un 
fantastico arcade, che nulla ha 
da invidiare alle macchine da 
bar. 


I l programma che viene descritto in 
queste pagine gira anche sullo Spec- 


trum con 16K di memoria RAM. Si tratta 
dell’adattamento di un celebre gioco da 
bar, Collisione. Voi comandate, tramite 
tastiera, un dredger (disinnescatore di mi- 
ne, rosso che gira in senso antiorario in 
un labirinto zeppo di mine, mentre un 
dredger blu è comandato dal computer. 
Conclusa la nota informativa (ma non era 
informatica?!) passiamo senz’altro alle 


modalità di caricamento. 

Colliders è compilato in BASIC, con alcu- 
ne routine in linguaggio macchina che 
vengono generate dal listato uno. 
L’algoritmo di fig. 1 illustra le operazioni 
da eseguire per avere registrata su nastro 
una copia funzionante di Colliders. 

Per una volta tanto sarete voi, invece del 
vostro computer, ad eseguire un “pro- 


\ 
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1 



* Stai registrando una copia di HEX-LOADER che non è neces- 
saria per giocare a colliders, ma preferiresti ricopiarti il lista- 
to 1 nel caso un RESET accidentale? 

** Era un NEW # non un RESET totale! Nei byte da 30555 a 
32767 è rimasto, intatto, il linguaggio macchina! 


gramma”! Comunque, ciò è stato fatto 
esclusivamente per evitare confusione. 
Quando sarete finalmente riusciti ad ave- 
re su nastro i tre file di cui è composto 
Colliders, riavvolgete il nastro e date un 
LOAD””. 

Descrizione del programma 

Dopo aver caricato i tre blocchi il pro- 
gramma parte automaticamente con la 
presentazione e la successiva schermata 
introduttiva (fig. 2). 

A questo punto viene simulato uno scon- 
tro con la relativa esplosione bitonale, e 
premendo un tasto, come richiesto, si ini- 
zia una partita (fig. 3). 



fig. 2 - Come giocare a Colliders 

Voi manovrate il dredger sulla destra, 
mentre il computer cercherà sistematica- 
mente di farvi scontare; l’unico modo per 
evitare la collisione consiste nel cambiare 
corsia in uno dei quattro punti strategici 
dove ciò è possibile, usando i tasti R,F 
per alto-basso e i tasti L, K per destra- 
sinistra, come del resto informa lo stesso 
programma. 

Fremendo “space” la velocità con cui di- 
sinnescate le mine raddoppia, e quindi 
finirete prima il quadro. 

Disinnescato il primo campo di mine udi- 
rete una breve melodia e poi... sotto con 
il secondo quadro! 

Il numero del quadro che state percorren- 
do è indicato dal numero stampato quasi 
al centro dello schermo, tra una curva e 
l’altra. 

Ogni tanto il dredger blu cambierà una 



fig. 3 - Il campo di gioco 


fig. 1 - Eseguite correttamente questo programma per farvi una 
copia funzionante di Colliders 
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mina rossa che si è guastata con una più 
robusta mina azzurra, che darà 101 punti 
invece dei dieci previsti per le mine rosse. 
Se alla fine della partita avete superato 
il MAX SCORE, questo verrà semplice- 
mente aggiornato. Se invece siete diven- 
tati dei campioni e riuscite a superare il 
TOP RECORD da me ottenuto (63893 
punti), allora avete la possibilità di regi- 
strare il nuovo top record appena conse- 
guito con il vostro nome e di inciderlo 
permanentemente su nastro. 

Alla domanda “Another GAME” rispon- 
dete battendo “n”: dovete poi riavvolgere 
il nastro e posizionarlo subito dopo i primi 
due blocchi CColliders” e “ColliCODE”) 
e incidere sopra al file RECORD. In segui- 
to si avrà un reset totale. 

Operando così, ogni qual volta carichere- 
te Colliders avrete il vostro Top Record 
scritto in fondo al quadro, sulla ventunesi- 
ma linea. 

Livelli di difficoltà e strategia 

Come i lettori più attenti avranno certa- 
mente notato, il dredger blu è attratto 
quasi “magneticamente” da quello rosso, 
ma ai punti di svincolo può cambiare solo 
una corsia (fig. 4), mentre voi potete pas- 
sare dalla prima alla terza corsia anche 
a tutta velocità e addirittura (questa è 
una finezza riservata ai più abili) cambia- 
re tre corsie e poi rientrare in un’altra, 
spostandovi così per quattro posizioni in- 



fig. 4-5-6 Come il dredger può cai 


termedie (fig. 6). 

A partire dal quarto quadro in poi il dred- 
ger blu potrà cambiare anche due corsie 
per volta (fig. 5) e dal settimo in poi svol- 
terà anche tre volte per svincolo (fig. 6). 

I maniaci di Collisione già sapranno che 
in questo gioco è essenziale riuscire a 
cambiare corsia quando il dredger avver- 
sario non può farlo perché non si trova 
su uno svincolo. 

In più occorre prestare molta attenzione 
allo svincolo est, con due sole corsie, e 
al “nodo” centrale, che impedisce il cam- 
bio di corsia per un periodo considerevol- 
mente lungo (è utile percorrerlo premen- 
do “space”, che ha effetto anche con un 
altro tasto premuto). 

Se vi sembra troppo facile, sappiate che 
dal sesto quadro in poi la velocità del 
dredger blu aumenta in modo random, 
costringendovi a tenere quasi costante- 
mente la velocità massima consentita e 
obbligandovi a raddoppiare anche la ve- 
locità dei vostri riflessi. 

A questo punto, dopo il cinquantasettesi- 
mo tentativo di terminare il primo qua- 
dro, quando mancano solo poche mine 
per coronare con successo la vostra mis- 
sione non poteva mancare il telefono che 
suona: niente paura, premete il tasto “1” 
e andate tranquillamente a rispondere. 
Terminate le maledizioni rivolte al malca- 
pitato, premete il tasto “2” e assaporate 
il gusto della sudata vittoria (a proposito, 



ibiare corsia 

t 


ogni tanto asciugate i tasti del vostro ZX, 
sono molto sensibili all’umidità). 

Se disponete di un amplificatore (potete 
utilizzare quello incorporato del vostro re- 
gistratore), collegatelo alla presa “EAR” 
dello Spectrum e ascoltate attentamente 
l’esplosione: non vi sembra di avere due 
altoparlanti? E inutile controllare, ce n’è 
proprio uno solo, eppure si sente chiara- 
mente un sibilo che cala lineamente di 
tono e contemporaneamente uno che 
scende, per così dire, a “balzi”. 

Questo effetto sonoro è ottenuto compo- 
nendo il suono con piccoli “beep” di bre- 
ve durata, alternando ora quelli costi- 
tuenti il primo sibilo ora quelli che forma- 
no il secondo, dando l’illusione di due sor- 
genti sonore. 

Un ultimo consiglio: se vi capita di scon- 
trarvi molto spesso, e ormai odiate a tal 
punto l’interminabile esplosione da male- 
dire il giorno in cui avete comprato que- 
sto numero di SUPERSINC, calmatevi e 
sostituite il RANDOMIZE USR 31915 di 
linea 310 con uno scialbo BEEP 3,-30 
Alcune notizie utili su Colliders 
Se desiderate un’altra copia di Colliders, 
caricatelo interamente e date un BREAK 
prima della schermata con le istruzioni, 
seguito da un GOTO 9001. 

Il significato delle varie POKE di linea 
9000 è il seguente: 

POKE 23693,4 è l’equivalente di PAPER 
0: INK 4: BRIGHT 0: FLASH 0. Notevo- 
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le è il risparmio di memoria e di tempo 
ottenuto selezionando gli attributi perma- 
nenti desiderati direttamente nei bit della 
variabile di sistema ATTR-P, il cui signifi- 
cato è illustrato in fig. 7. 

POKE 23624,5 è l’equivalente di BOR- 
DER 0, con in più il vantaggio di poter 
scegliere gli attributi permanenti della 
“Lower Part” In fig. 8 trovate il significato 
dei bit della variabile di sistema 
BORDCR. 

POKE 23676,127 serve per abbassare 
gli UDG come per un 16K, ignorando i 
32K di RAM superiori. 

In fig. 10 trovate la descrizione dell’utiliz- 
zo dei 21 UDG, quasi tutti modificabili a 
piacere. 

I caratteri da R a T servono da supporto 
per le variabili di programma (fig. 11) 
usate dalla routine in L.M.. 

Nella U grafica vi sono i dati del TOP RE- 
CORD. 

Se qualche “esperto” di L.M. volesse mo- 
dificare Colliders, può avvalersi dell’aiuto 
della fig. 9, dove vengono descritte le rou- 
tine interne, e controllare il disassemblato 
di fig. 13. 

La sub-routine che stampa lo schermo di 
gioco e inizia a 31984 occupa circa mezzo 
Kappa, a differenza dei 6912 byte occu- 
pati da una schermata standard. 

Questa forte riduzione è resa possibile da 
una compattazione dati molto concentra- 
ta. Mi spiego meglio: all’inizio vengono 
stampati in verde tutti gli elementi del 
labirinto, prelevando i dati necessari da 
un buffer che genera un carattere ogni 
due bit, per cui per stampare 4 caratteri 
occorre un solo byte invece di 32, con 
una riduzione al 3.125%! 

In seguito vengono stampati gli elementi 
mancanti, perché con due bit a disposizio- 
ne è possibile avere solo quattro variazio- 
ni (il rettilineo, orizzontale e verticale, la 
mina e lo spazio). 

Le mine devono poi essere colorate di 
rosso, e questo avviene effettuando una 
scansione del video comparata ad un buf- 
fer apposito, all’interno del quale ogni bit 
1 indica che la locazione corrispondente 
va colorata in rosso; se il bit è 0, va lascia- 
ta in verde. 

In questo modo si ottiene la definizione 
di un carattere ogni bit (riduzione al 
12.5%). 

Questo metodo ha lo svantaggio di essere 
nettamente più lento rispetto ad un sem- 
plice trasferimento dati (con l’istruzione 
LDIR o LDDR), che permette uno spetta- 
colare cambio di schermo istantaneo, ma 
ha il grande vantaggio di occupare meno 
di un decimo di un normale screen (senza 
questo accorgimento i nostri amici sedici- 
kappisti sarebbero rimasti a bocca asciut- 
ta, o meglio a “memoria vuota”!) e di 
conseguenza viene anche ridotto il tempo 
di attesa durante il caricamento. 

Buon disinnescamento e... in bocca al 
dredger!!! 

N.B.: la linea 0 presente nel listato 2 non 
è inseribile con i normali sistemi. Se pro- 
prio volete, digitatela con un altro nume- 
ro di linea... 


Variabile di sistema ATTR P byte 23693 


ATTRIBUTI 

LASH 

BRIGHT 







PARAMENTI 

(l=ON 

(l=ON 







UPPER PART 

0=OFF) 

0=OFF) 








7 

6 

5 

4 

3 

2 

1 

0 


fig. 7 - Schema della variabile di sistema che contiene gli attri 
buti del colore del video 


Variabile di sistema BORDCR byte 23624 


ATTRIBUTI 

FLASH 

BRIGHT 







PARAMENTI 

(l=ON 

(l=ON 







LOWER PART 

0=OFF) 

0=OFF) 








7 

6 

5 

4 

3 

2 

1 

0 


fig. 8 - Schema della variabile di sistema che controlla gli attri- 
buti del colore della zona degli input 


NOME 

IND. PARTENZA LUNGHEZZA 

SCOPO 

Collicode 

30555 (77564) 1360 

Gestione punteggio e 
movimento dredger 

Sound 

31915 (7CA64) 69 

Genera l’esplosione 

Sceen 

31984 (7CF04) 616 

Stampa lo schermo di gioco 

Chars 

32600 (7F58H) 168 

Non è L.M., sono gli UDG di fig. 10 


fig. 9 - Le routine di linguaggio macchina contenute nel pro- 
gramma! 

BYTES UTILIZZATI 

SCOPO 

da USR “a” fino ad USR “j" + 7 

Caratteri del contorno del labirinto 
(unici non modificabili) 

da USR “k” fino ad USR “k” + 7 

Mina da 10 punti 

da USR u l” fino ad USR “1” + 7 

Mina da 101 punti 

da USR “m" fino ad USR “m" + 7 

Dredger 

da USR “q” fino ad USR “q" + 7 

Esplosione 

da USR V fino ad USR V + 7 

Variabili di programma (cfr. fig. 11) 


fig. 10 - Come sono utilizzati i caratteri definibili 


N° 







byte 

Carattere 

Indirizzamento 

Valore iniziale 

Campo 

Significato 

byte partenza 

2 

R 

v+19 

14 

1-29 

X Coordinate 

32739 

1 

R 

v+2 

19 

1-19 

Y Coordinate dredger 
blu 

32738 

1 

R 

v+3 

2 

0.3 

Direzione dredger blu 

32739 

1 

R 

v+5 

4 

2.4 o 5 

ATTR della posizione 
coperta dal dredger blu 

32741 

1 

R 

v+6 

32 

32. 154 o 155 

CHR come v+5 

32742 

2 

R/S 

v+7 

15 

1-29 

X Coordinate dredger 
rosso 

32743 

1 

S 

v+9 

19 

1-19 

Y Coordinate dredger 
rosso 

32744 

1 

S 

vi 

1 

1-3 

Cornice dredger rosso 

32746 

1 

S 

vl+1 

0 

0-3 

Direzione dredger rosso 

32747 

1 

S 

vl+2 

255 

0-255 

Numero di mine da 
disinnescare 

32748 

1 

S 

vl+3 

0 

0-9 

Numero quadro 

32749 

1 

S 

vl+4 

0 

0-3 

l=Fine quadro, 

2=come 1 con quadro 
uguale a 9, 

3=bang 

32750 

1 

S 

vl+5 

0 

0-1 

Flag 1 

32751 

1 

T 

vl+6 

0 

0-1 

0=0. K.. l=bang 

32752 

3 

T 

vl+7 

0 

0-999999 

Punteggio attuale 
(ATTENZIONE: sono 
numeri BCD e viene 
ignorato il primo digit 
più significativo) 

32753 

3 

T 

vl + 10 

5000 

5000-999999 

Max score, modalità 
come vl+7 

32756 

1 

T 

vl + 13 

1 

0-1 

Flag 2 

32759 

5 

U 

vl + 14 

- 

- 

Nome TOP RECORD 

32760 

3 

U 

vl+19 

63893 


TOP SCORE 

32765 


fig. 11 - Variabili usate nelle routine in linguaggio macchina 
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Descrizione del programma ano 

Linee Commento 

10 inizializza le variabili di controllo. 

20 legge una linea di DATA in a$ e salta a 40 se legge “STOP” 

30 traduce le venti cifre esadecimali in dieci numeri decimali, li memorizza a partire da 30555, aggiorna la variabile di 

supervisione, stampa al centro dello screen e va a 20 
40 se c’è un errore nei DATA, ferma con uno STOP statement 

50 SAVE una copia di Hex Loader di “riserva” e poi un NEW 

1000 - 1221 sono linee DATA con ben 4426 digit esadecimali (se fossero stati usati numeri decimali si sarebbe dovuta utilizzare 
quadrupla memoria con 6639 cifre e molte, molte virgole...) 

Descrizione del programma due 


Linee 


10 - 

110 

120 - 

160 

200 * 

300 

310 - 

340 

350 


380 



4000 

5000 

6000 

7000 

8000 

9000 


9001 


Commento 

stampa presentazione 
stampa istruzioni 

inizializzazioni varie; riportano le variabili di fig. 1 1 al loro valore iniziale (non tutte, il Max Score ad esempio è inalterato) 
elaborazione dei dati di ritorno dalla routine in L.M. e decisioni in merito. ^ 

se il Max Score è stato superato e il punteggio attuale è maggiore di quello del TOP RECORD, vengono chieste le cinque 
iniziali che rimpiazzeranno il vecchio top record 

se non si desidera giocare ancora, viene trasferito l’attuale top record su nastro e poi viene effettuato un reset apocalittico 

con l’istruzione OUT 254,USR634, che effettua un salto in L.M. alla locazione 634, sulla ROM di sistema, che contiene 

199, cioè RST 0, l’equivalente di un RAND USR 0 

aggiunge a destra di r$ tanti spazi fino ad arrivare a LEN r$=5 

aggiorna il max punteggio e setta re, se è stato superato 

musica a seconda della variabile di programma vi +3 (byte 32749) 

calcola il valore BCD dei tre byte successivi al valore di k 

aumenta incondizionatamente il livello di difficoltà 

seleziona i colori BORDER-PAPER-INK, abbassa RAMTOP e carica i due blocchi di byte, oltre ad abbassare a 32600 
gli UDG. 

E la routine da eseguirsi in conseguenza all’istruzione LINE 
routine di duplicazione di Colliders 


Colliders 

versione per ZX Spectrum 16/48K 

Listato 1 

caricatore esadecimale 

10 LET d=0 : LET a=30555 
20 READ a$ : IF a$=" STOP " 

THEN GO TO 40 
30 FOR f=l TO LEN a$ STEP 2: 
PRINT AT 1 2 , 1 4 ; a : LET s = 
CODE a$ ( f ) : LET c=CODE a$(f 
+1): LET n= ( s- ( 48 AND s<58) 
-(55 AND s>64) ) *1 6+c- (48 
AND c< 58) - (55 AND c>64): 
LET d=d+n: POKE a,n: LET a 
=a+l : NEXT f: GO TO 20 
40 IF d<>223636 THEN 

PRINT ' ' "Errore DATA :cont 
neglio!": STOP 
lex-Loader " : NEW 


50 

1 000 

rolla 

SAVE 

DATA 

1 001 

DATA 

1 002 

DATA 

1 003 

DATA 

1 004 

DATA 
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1 005 

DATA 

1 006 

DATA 

1 007 

DATA 

1 008 

DATA 

1 009 

DATA 

1 01 0 

DATA 

1 01 1 

DATA 

1 01 2 

DATA 

1 01 3 

DATA 

1 01 4 

DATA 

1 01 5 

DATA 

1 01 6 

DATA 

1 01 7 

DATA 

1 01 8 

DATA 


"1 8227BFE20201 4CDD1 77" 
"3AEE7FFE00C01 1 030021 " 
"5 81 BCDB50 31 80 91 1 03 00" 
"21 401 FCDB50 3CD4 07A3 A" 
" F 0 7 FFE 0 0 C 0 3 AED 7 FFE 0 6" 
"FAC977ED5FCB4 7CC4 07A" 
"3AF07FFE00C01 88A3E02" 
"CD01 1 63E1 6D73AE97FD7" 
" 3 AE77FD7 3E2 0D7CD8E02 " 
"D53AEB7FFE00280FFE01 " 
"2873FE02CACD78FE03CA" 
"3679C9D1 7BD60DD5201 8" 
"060D0E0F1 611 1 El 3CD43" 
"7C300B21E97F353521 EA" 



1 01 9 

DATA 

1 020 

DATA 

1 021 

DATA 

1 022 

DATA 

1 023 

DATA 

1 024 

DATA 

1 025 

DATA 

1 026 

DATA 

1 027 

DATA 

1 028 

DATA 

1 029 

DATA 

1 030 

DATA 

1 031 

DATA 

1 032 

DATA 

1 033 

DATA 

1 034 

DATA 

1 035 

DATA 

1 036 

DATA 

1 037 

DATA 

1 038 

DATA 

1 039 

DATA 

1 040 

DATA 

1 041 

DATA 

1 042 

DATA 

1 043 

DATA 

1 044 

DATA 

1 045 

DATA 

1 046 

DATA 


"7F341 81 CDl 7BD60ED520" 
"1 5060D0E0F511E1 1CD43" 
"7C300921E97F343421EA" 
"7F3521 E77F343AEA7F47" 
"3AE77FD61 F8080472005" 
"3E01 32EB7F3AE77FFE1 3" 
"200C3AE97FFE0D20053E" 
"01 32EB7FC39D79D1 7BD6" 
"11D5201 7061 D481 60A1E" 
"0CCD4 3 7C300B2 1 E77F3 5" 
"3521EA7F341 81CD1 7BD6" 
"1 9D5201 50 61 B4 81 60A1E" 
"0CCD437C300921 E77F34" 
"3421 EA7F3 521E97F353A" 
"EA7F473AE97F3C909020" 
"073E0232EB7F1 81 33AE7" 
"7FFE1 92 00C3 AE97FFE0 9" 
"2 00 53E02 32EB7FC3 9D7 9" 
"DI 7BD60ED5201 8060E0E" 
"1 01 601 1 E03CD437C300B" 
"21E97F343421 EA7F341 8" 
" 1 DDl 7BD60DD5201 6060E" 
"0E1 01 60 31 EO 5CD4 3 7C3 0" 
"0921E97F353521EA7F35" 
"21 E77F353AEA7F473AE7" 
"7F3C909020073E0332EB" 
"7F1 81 3 3 AE 7 7 FFE 0 7 2 0 0 C " 
"3AE97FFE0920053E0332" 



1 047 

DATA 

1 048 

DATA 

1 049 

DATA 

1 050 

DATA 

1 051 

DATA 

1 052 

DATA 

1 053 

DATA 

1 054 

DATA 

1 055 

DATA 

1 056 

DATA 

1 057 

DATA 

1 058 

DATA 

1 059 

DATA 

1 060 

DATA 

1 061 

DATA 

1 062 

DATA 

1 063 

DATA 

1 064 

DATA 

1 065 

DATA 

1 066 

DATA 

1 067 

DATA 

1 068 

DATA 

1 069 

DATA 


"EB7FC39D79D1 7BD61 9D5" 
"201 80601 0E031 6091E0B" 
"CD437C300B21 E77F3434" 
"21 EA7F341 81 DDl 7BD61 1 " 
"D5201 60 60 3 0E0 51 6091E" 
"0BCD437C300921 E77F35" 
"3521 EA7F3 521E97F343A" 
"EA7F473AE97FD61 58080" 
"20073E0032EB7F1 81 33A" 
"E77FFE0 72 00C3AE97FFE" 
"0D20053E0032EB7F21 00" 
"581 1 20003 AE97F4 71 91 0" 
"FDED5BE77F1 97E0600FE" 
"02200B3AEC7F3D32EC7F" 
"060A1 80DFE0 52 0093AEC" 
"7F3D32EC7F069BC53E1 0" 
"D73E02D73E1 6D73AE97F" 
"D73AE77FD73AEB7FC69C" 
"D721 F37F7EC1 8027772B" 
" 7 ECE 002 7772 B7 ECE 002 7" 
"773E1 6D73E07D73E0DD7" 
"CD837C3E073AEC7FFE00" 
"201 1 3E01 32EE7F3AED7F" 
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1 070 

DATA 

1 071 

DATA 

1 072 

DATA 

1 073 

DATA 

1 074 

DATA 

1 075 

DATA 

1 076 

DATA 

1 077 

DATA 

1 078 

DATA 

1 079 

DATA 

1 080 

DATA 

1 081 

DATA 

1 082 

DATA 

1 083 

DATA 

1 084 

DATA 

1 085 

DATA 

1 086 

DATA 

1 087 

DATA 

1 088 

DATA 

1 089 

DATA 

1 090 

DATA 

1 091 

DATA 

1 092 

DATA 

1 093 

DATA 

1 094 

DATA 

1 095 

DATA 

1 096 

DATA 

1 097 

DATA 
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"FEO 92 00 53E02 32EE7F3 A" 
"E77F473 AE 0 7 FB 8 2 01 43A" 
"E97F473AE27FB8200A3E" 
"0332EE7F3E01 32EF7FD1 " 
"C93E1 6D73AE27FD73AE0" 
"7FD73E1 0 D 7 3 AE 57FD73A" 
"E67FD73AE47F473AEA7F" 
"902E022807F26B7A2E00" 
"1 8022E01 E53AE37FFE02" 
"CA84 7AFE01 CAD0 7AFE00" 
"CAI B7BFE0 3CA6 87BC90 6" 
"0E0E0E1 60F1 El 3CD637C" 
"D2A67A3AE27FE1 9595C6" 
"0232E27F3AE47F853D32" 
"E47FE521 E07F353AE47F" 
"473AE07F3C909020083E" 
"01 3 2 E 3 7 FC 3 B F 7 B 3 AE 0 7 F " 
"FEO 7C2BF7B3 AE2 7FFE0D" 
"C2BF7B1 8E60601 0E051 6" 
"0 Al E0ACD637C301 43AE0" 
"7FE1 8585D60232E07F3A" 
"E47F853D32E47FE521 E2" 
" 7 F 3 5 3 AE 4 7 F 4 7 3 AE 2 7 F 3C " 
"909020083E0032E37FC3" 
"BF7B3AE07FFE07C2BF7B" 
" 3 AE2 7FFE0 9C2BF7B1 8E6" 
"0E0F060F1 601 1 E05CD63" 
"7CD23D7B3AE27FE1 8585" 

t 


1 098 

DATA 

1 099 

DATA 

1 1 00 

DATA 

1 1 01 

DATA 

1 1 02 

DATA 

1 1 03 

DATA 

1 1 04 

DATA 

1 1 05 

DATA 

1 1 06 

DATA 

1 1 07 

DATA 

1 1 08 

DATA 

1 1 09 

DATA 

ino 

DATA 

1111 

DATA 

1112 

DATA 

1113 

DATA 

1114 

DATA 

1115 

DATA 

1116 

DATA 

1117 

DATA 

1118 

DATA 

1119 

DATA 

1 1 20 

DATA 

1 1 21 

DATA 

1 1 22 

DATA 

1 1 23 

DATA 

1 1 24 

DATA 

1 1 25 

DATA 


"D60232E27F3AE47F853D" 
"32E47FE521 E07F343AE4" 
"7F473AE07F8080D61 F20" 
"083E0332E37FC3BF7B3A" 
"E07FFE1 3C2BF7B3AE27F" 
"FE05C2BF7B1 8E6061 BOE" 
"1 Di EOBl 60BCD637CE1 30" 
"203AE47FFE0220077DFE" 
"0220021 81 23AE07F9595" 
"C60232E07F3AE47F853D" 
"32E47FE521 E27F343AE4" 
"7F473AE27F8080D61 520" 
"073E0232E37F1 81 03AE0" 
"7FFE1 32 0093 AE2 7FFE0D" 
"20021 8E921 00583AE27F" 
"471 1 20001 91 0FAED5BE0" 
"7 Fi 97E32E57 FFE 022 00 7" 
"3E9A32E67F1 81 0FE0520" 
"073E9B32E67F1 8053E20" 
"32E67FE1 ED5FFE0 5F2 1 2" 
" 7 C 3 AE 5 7 FFE 02 2 01 33E05" 
"32E57F3E9B32E67F1 1 64" 
"0021 3200CDB5033E1 6D7" 
"3AE27FD73AE07FD73E1 0" 
"D73E01 D73AE37FC69CD7" 
" 3 AE 7 7 F 4 7 3 AE 0 7 FB 8 2 0 0 F " 
" 3 AE 9 7 F 4 7 3 AE 2 7 FB 8 2 00 5" 
"3E01 32F07FC93AE77FB8" 


1 1 26 

DATA 

1 1 27 

DATA 

1 1 28 

DATA 

1 1 29 

DATA 

TI 30 

DATA 

1 1 31 

DATA 

1 1 32 

DATA 

1 1 33 

DATA 

1 1 34 

DATA 

1 1 35 

DATA 

1 1 36 

DATA 

1 1 37 

DATA 

1 1 38 

DATA 

1 1 39 

DATA 

1 1 40 

DATA 

1 1 41 

DATA 

1 1 42 

DATA 

1 1 43 

DATA 

1 1 44 

DATA 

1 1 45 

DATA 

1 1 46 

DATA 

1 1 47 

DATA 

1 1 48 

DATA 

1 1 49 

DATA 

1 1 50 

DATA 

1 1 51 

DATA 

1 1 52 

DATA 

1 1 53 

DATA 


"FA607CED4481 FA607C3A" 
"E97FBAFA60 7CED4 4 83FA" 
"607C371 802373FC93AE0" 
"7FB8FA807CED4481 FA80" 
"7C3AE27FBAFA807CED44" 
"83FA807C371 802373FC9" 
"3E1 0D73E04D73E00ED67" 
"F5C630D7F1 ED6F2 30602 " 
"ED6FF5C630D7F1 ED6FF5 " 
"C630D7F1 ED6F231 0EDC9" 
"21 0A001 1 0A003E1 6D73A" 
"E27FD73AE07FD73E1 0D7" 
"3E00D73EA0D7D5E5CDB5" 
"0321 0058ED4BE77F093A" 
"E27F471 1 20001 91 OFDED" 
"5FE60777E1 Di 237DFE5A" 
"20DC1 B7BFE01 20D6C92A" 
"7B5C01 1 00009EB21 9D7D" 
"01 1 000EDB03E02CD01 1 6" 
"3E1 0D73E04D721 BD7D7E" 
"FE33282B57E6C0CB07CB" 
"07C690D77AE630CB3FCB" 
"3FCB3FCB3FC690D77AE6" 
"0CCB3FCB3FC690D77AE6" 
"03C690D7231 8D02A7B5C" 
"01 1 00009EB21 AD7D01 1 0" 
"00EDB021 205811 667E1 A" 
"FEDDCA8D7DCB7FC49A7D" 



1154 DATA "23CB77C49A7D23CB6FC4" 

1155 DATA "9A7D23CB67C49A7D23CB" 

1156 DATA "5FC49A7D23CB57C49A7D" 

1157 DATA " 2 3CB4FC4 9A7D2 3CB4 7C4 " 

1158 DATA "9A7D231 31 8C721 B37E7E" 

1159 DATA "FEFFC823E5D7E1 1 8F636" 

1160 DATA "02C90000000000000000" 

1161 DATA "00000018180000001818" 

1162 DATA "0C0F030000001 81 830F0" 

1163 DATA "C0000000800000000000" 

1164 DATA "000A7FFFFFFFFFFFFFF6" 

1165 DATA "7800002A800000B677FF" 

1166 DATA "FFFFFFFFFF76 7780002 A" 

1167 DATA "80800B76777FFFFFFF6A" 

1168 DATA "A776777800000B6AA776" 

1169 DATA "7776 AAAAA 1 6 AA 7767778" 

1170 DATA "00000B800B7 6 7BB7FFFF" 

1171 DATA "FFFFF7B67BB780000B80" 

1172 DATA "B7B6 7BB76 AAAA76 A77B6 " 

1173 DATA "7BB780000B6A77B67777" 

1174 DATA "FFFFFF6A7776777 80000 " 

1175 DATA "0080B776777FFFFFFFFF" 

1176 DATA "F7767780002A80000B76" 
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1 1 77 

DATA 

1 1 78 

DATA 

1 1 79 

DATA 

1 1 80 

DATA 

1 1 81 

DATA 

1 1 82 

DATA 

1 1 83 

DATA 

1 1 84 

DATA 

1 1 85 

DATA 

1 1 86 

DATA 

1 1 87 

DATA 

1 1 88 

DATA 

1 1 89 

DATA 

1 1 90 

DATA 

1 1 91 

DATA 

1 1 92 

DATA 

1 1 93 

DATA 

1 1 94 

DATA 

1 1 95 

DATA 

1 1 96 

DATA 

1 1 97 

DATA 

1 1 98 

DATA 

1 1 99 

DATA 

1 200 

DATA 

1 201 

DATA 

1 202 

DATA 

1 203 

DATA 

1 204 

DATA 
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"77FFFFFFFFFFFF767800" 

"002 A8 0 0 0 0 0 B6 7 FFFFFE A " 

"BFFFFFF6 800000000000" 

"000A337FFFFFFC4 00000" 

" 04 5FFFFFF4 5000001 457" 

"FFF01 454001 01 454001 0" 

"1 4 54 001 01 4 55FFFFD4 55" 

"001 05455001 05455001 0" 

" 54 55FFF0 54 540000 5457" 

"FFFFD4 5000001 45FFFFF" 

"F44 0000004 7FFFFFFCDD" 

"1 600001 501 961 71E001 0" 

"08970D0D1 70200961 71C" 

"00970D0D1 70400961 71 4" 

"00941 71 A00970D1 71 600" 

"4D41 580D1 70600961 71 2" 

"00971 71 50053434F5245" 
» 

"ODI 70700 5 3636 F7 2653 A" 
"ODI 70600981 71 200931 7" 
"1 400921 71 A00990D0D1 7" 
"0800961 71 200971 71 400" 
"961 71 800970D1 709004C" 
"6 966653A0D1 70 800 921 7" 
"1 200930D0D1 70600921 7" 
"1 400951 71 800930D0D1 7" 
"0400921 71 A00930D0D1 7" 
"0200921 71C00930D0D92" 
"171 E0093FF000000FFFF" 

e 


1 205 
1 206 
1 207 
1 208 
1 209 
1 21 0 
1 21 1 
1 21 2 
1 21 3 
1 21 4 
1 21 5 
1 21 6 
1 21 7 
1 21 8 
1 21 9 
1 220 
1 221 


DATA "0000001 81 81 81 81 81 81 8" 
DATA "1 81 81 80C0F030000001 8" 
DATA "1 830F0C0000000000000" 
DATA "FFFF3C1 81 81 81 83CFFFF" 
DATA "000000000000030F0C1 8" 
DATA "1 8000000C0F0301 81 81 8" 
DATA "1 81 CI Fi Fi CI 81 81 81 83 8" 
DATA "F8F8381 81 80000001 81 8" 
DATA "00000000001824241800" 
DATA "00E04E64FFFF644EE01 8" 
DATA "5A7E5A1 8BDFF99077226" 
DATA "FFFF26720799FFBD1 85A" 
DATA "7E5A1 800401 81 01 E69C0" 
DATA "800E001 30201 04200F00" 
DATA "1 301 00FF01 0000000000" 
DATA "00005000015374657665" 
DATA "063893"," STOP " 


Collidere 

versione per ZX Spectrum 16/48K 

Listato 2 

programma principale 


0 REM 


©©©©©©©©©©©©©©©© 


© © 

Colliders ®® 

©© by S. Cerutti 27/6 
/I 984 ©© 

©© ZX-Spe 

ctrum 1 6K ®® 

© © © © 


10 CLS : PRINT 'TAB 4; INK 1;" 
G A A AAAAAA AAAAAA A A A AAAAAH " ' 
TAB 4 ; "B" ; INK 3;"S&C Corp. 

Ltd Software"; INK 1 ; "B" ' 
TAB 4 ; "CAAAAAAAAAAAAAAAAAAA 


20 

30 

40 

50 

60 

70 

80 

90 

1 00 

1 1 0 

1 20 

1 30 

1 35 

1 40 

1 41 


AAAD" 

PRINT 'TAB 12; INK 7;"prese 
nts" 

PRINT ''''TAB 3 ; " { G4 } { SG3 } 
{SG7 } { G 4 } { SG3 } { SG7 } { G4 } 

{ G4 } { G4 } { SG3 } { SG7 } 

{ 2SG3 } {SG7 } {G4 } {SG3} {SG7 } 

{ G4 } { SG3 } { SG7 } " 

PRINT TAB 3 ; " { G 5 } {G5} 

{ SG5 } { G5 } { G5 } { G5 } 

{ SG4 } { G7 } {SG5 } {G5} 

{SG5} {G5}" 

PRINT TAB 3 ; " { G5 } {G5} 

{ SG5 } { G5 } { G 5 } { G5 } 

{ SG5 } { G5 } { SG1 } { SG7 } {G5} 

{SG4} {G2} {G5} { SG3 } { SG7 } " 
PRINT TAB 3 ; " { G 5 } {G5} 

{SG5} { G5 } {G5 } { G5 } 

{ SG1 } { SG2 } { SG5 } { 2G5 } 

{SG5} " 

PRINT TAB 3; "{Gl } { G3 > {G2} 
{Gl } {G3} { G2 } {Gl } {G3} {G2} 

{Gl } {G3 } { G2 } {Gl } { G 3 } { G 2 } 
{2G3} { G2 } {Gl } {G2}{Gl }{G3} 
{G2 } " 

PRINT ''TAB 8; INK 1;"® Cop 
yright 1984" 

BEEP .8,26: BEEP 1.6,30: 
PAUSE 33: BEEP 2.8,25: 

BEEP 3.2,26 

PRINT # 1 ; AT 0,7; "Please hit 
any key" 

FOR f=0 TO 100: NEXT f: 
PAUSE 0 

CLS : LET rc=0 : PRINT TAB 1 
1 ; "COLLIDERS " ; ' ' ; TAB 9;"by 
S. Cerutti": PLOT 72,150: 
DRAW 102,0 

PRINT '"' Tasti da usare:"' 

' " L = destra. 1 = paus 

a."''" K = sinistra. 2 = 
continua."''" R = alto. 

<space> = raddop-"''" F = 
basso. pia la velocita'. 

tl 

LET z$ = "M " + 

CHR$ 1 6+CHR$ 1 + "0" 

PRINT ' " BONUS un dredger a 
10000 punti."''" Il tuo dr 
edger: "; INK 2;z$' '" K "; 
INK 4 ; "= 10 punti. "; 

INK 5 ; "L" ; INK 4;" = 101 p 
unti . " 

IF PEEK 32759 THEN POKE 32 



759,0: GO SUB 6000: FOR f=l 
7 TO 29: BEEP .03,-30: 

LET z $ ( f - 1 6 ) = " ": LET z$(f 
- 1 5) ="M" : PRINT AT 17,17; 

INK 2 ; z$ : NEXT f: PRINT 
AT 17,30;" ": POKE 32743,31 
: POKE 32745,17: POKE 32736 
,31: POKE 32738,17: PRINT : 

RANDOMIZE USR 31915: 

PRINT AT 17,31; INK 7;"Q" 

142 PRINT AT 17,31;" " AND zi? ( 1 
)<>" ";#1;AT 0,9; "Premi u 
n tasto" 'TAB 10; "per inizia 
re" 

145 LET j=l : LET h=l : LET lv=31 
367 

150 IF INKEY$ <> " " THEN 

GO TO 1 50 

160 IF INKEY$ = " " THEN GO TO 1 6 
0 

200 LET bo=0 : LET v=USR "r": 

LET a$= " NNN " : POKE lv,14: 

LET vi =v + l 0 : POKE lv+80 ,.l 0 

210 POKE vl+7,0: POKE vl+8,0: 

POKE vi +9,0: POKE vi +3,0: 

POKE lv+151,15: POKE lv+23 
2,11 

220 POKE vl+2,255: CLS : 

RANDOMIZE USR 31984: 

POKE v 1 +3 , 1 +PEEK (vi +3) : 

PRINT AT 12,22; PEEK (vi +3 ) 

: PRINT AT 21,0; "TOP RECORD 
" ; TAB 20;: FOR f=USR "u" 

TO vi +18: PRINT CHR$ 

PEEK f;: NEXT f: LET k=vl+l 
9: GO SUB 7000: PRINT ":";p 
u 

230 PRINT AT 19,13;" " ; AT 11 

,14;" " ; AT 11 ,14;a$: 

RESTORE : FOR f=v TO vi +1 : 

READ X*. POKE f,x: NEXT f 

240 POKE vl+4,0: DATA 14,0,19,2 
,1,4,32,15,0,19,1,0: POKE v 
1+5,0 

245 GO SUB 5000 
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250 LET k=vl+10: GO SUB 7000: 
PRINT AT 7,21; "0" AND 
NOT PEEK (vi +1 0) ; AT 7,26- 
LEN STR$ pu;pu 

260 IF PEEK ( v 1 +7 ) =1 AND bo=0 

THEN LET bo=l : LET a$=a$+ 
"N": PRINT AT 7,13; FLASH 1 
^BONUS": FOR f =0 TO 100: 
BEEP .008,40: NEXT f: 

PRINT AT 1 1 , 1 4 ;a$ 

290 IF j AND PEEK (vi +3) >3 

THEN LET j=0: GO SUB 8000 

300 IF h AND PEEK (vi +3) >6 

THEN LET k=0: GO SUB 8000 

310 RANDOMIZE USR 30555: IF 

PEEK ( v 1 +6 ) OR PEEK (vl+4) = 
3 THEN RANDOMIZE USR 319.15 
: GO SUB 5000: PRINT AT 
PEEK (v+2 ) , PEEK v; " " ; 

CHR$ 8; INK PEEK (v+5) ; ( 
CHR$ PEEK (v+6) ) AND PEEK ( 
vi +4) : POKE vl+6,0: POKE vi 
+ 4,0 

31 4 GO SUB 5000 

319 IF PEEK ( v 1 +4 ) =2 THEN 

PRINT AT 1,1; FLASH 1 ; "Con 
gratulazioni ! ! ! Hai " 

; AT 3 , 3 ; "Raggiunto il quadr 
O NOVE!": GO TO 350 

320 IF PEEK (vi +4) =1 THEN 

GO SUB 6000: GO TO 220 
340 IF LEN a$>0 THEN LET a$=a$ 
(2 TO ) : GO TO 230 
350 IF re THEN LET k=vl+10: 

GO SUB 7000: LET z=pu: 

LET k=k+9 : GO SUB 7000: 

IF z >pu THEN PRINT AT 21 , 
0;"Scrivi le tue iniziali 
(Max. 5)": INPUT LINE r$ : 

GO SUB 4000: PRINT AT 21,0 

• tl 
f 

": FOR f=l TO 5: 

POKE USR " u" - 1 +f ,CODE r$(f 
) : NEXT f : POKE vi +1 9, 

PEEK (vl+10): POKE vi +20, 
PEEK (Vi +11): POKE vi +21, 
PEEK (vi +12) 

355 PRINT AT 11,9; FLASH 1 ; "Gam 
e OVER": FOR f=0 TO 1000: 

NEXT f: PRINT AT 13, 7; "Ano 
ther GAME?" 

360 IF INKEY$ <> " " THEN 


GO TO 360 


370 

IF 

A 

INKEY$ = " " 

THEN GO 

TO 3 7 

380 

U 

IF 

INKEY$ = "n" 

THEN 

CLS : 


PRINT #1 ; "Riavvolgi il nas 
tro e posiziona-lo prima de 
1 file RECORD: poi": 

SAVE "RECORD "CODE USR "u", 
8: OUT 254, USR 634: REM I 
had a good time with you ! 

i i 

390 GO TO 1 20 

4000 IF LEN r$ < 5 THEN LET r$=r$ 
+" ": GO TO 4000 

4010 RETURN 

5000 LET k=vl +7 : GO SUB 7000: 

LET at=pu: LET k=k+3: 

GO SUB 7000 

5010 IF at >pu THEN LET rc = l : 

POKE vl+10, PEEK (vi +7) : 

POKE vi +11, PEEK (vi +8): 

POKE v 1 +1 2 , PEEK (vi +9) : 

PRINT AT 7 , 2 6 -LEN STR$ at; 
at 

5020 RETURN 

6000 RESTORE 6010: FOR f=l TO 10 
: READ al , a 2 : BEEP . 04*al, 
PEEK 32749*5+a2: NEXT f: 

RETURN 

6010 DATA 1,0, 1,2, 1,0, 1,2, 5, 3, 5, 
3,5,7,5,10,7,8,20,8 

7000 LET pu=PEEK k*le4: LET dg= 
PEEK (k+1 )/l 6: LET pu=pu+ 
INT dg*l e3+ (dg- INT dg) *1 600 
: LET dg=PEEK (k+2)/16: 

LET pu=pu+INT dg*10+(dg- 
INT dg) *1 6 : RETURN 

8000 POKE 1 v , PEEK lv+1 : POKE lv+ 
80, PEEK (lv+80 ) +1 : POKE lv+ 
151, PEEK (lv+1 51 ) - 1 : POKE 1 
v+2 32 , PEEK (lv+232) - 1 : 

RETURN 

9000 POKE 23693,4: CLS : POKE 23 
624,5: CLEAR 30554: 

RANDOMIZE : POKE 23676,127 
: LOAD ""CODE : LOAD "RECOR 


9001 

D"CODE USR "u": 
REM 

RUN 


9005 

CLEAR 




901 0 

SA VE 

"Coll ider s" 

LINE 

9000 

9020 

SAVE 

"Coll iCODE 

"CODE 

30555 


,221 3 




9030 

SAVE 

" RECORD "CODE USR 

"u" ,8 
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Colliders 
versione per 


ZX Specimen 16/48K 

disassemblato 


7756 

CDBF02 

Cali 02BF 

775E 

F631 

cp 31 

7760 

2307 

jr nz, 7769 
CIU 02BF 

7762 

CDBF02 

m im 

CP 32 

3r nz,7762 

7 7 69 

*F 

xo r a 

776* 

326F7F 

ld ( 7FEP ) , « 
cali 7701 

7760 

CDO 177 

7770 

3*£67F 

ld • , (7FEE) 
CP 00 

7770 

F600 

7775 

C0 

rat nz 

7776 

7* 

ld a , d 

7777 

F £ 20 

CP 20 

7779 

2014 

jf n Z . 776F 
cau 7701 

7776 

C00 177 

7776 

3*6E7F 

ld a , (7FEE) 

7781 

F £30 

CP C0 

7783. 

C0 

fai nz 

7784. 

110300 

id da. 0003 

7787 

215816 

ld hl,lB58 

778* 

COB503 

cau 0365 

7780 

1822 

jf 77B 1 

776F 

76 

ld a , a 

7790 

F620 

CP 20 

7792 

2014 

Jf nz .77*8 
cau 7701 

7794. 

CDO 177 

7797 

3*EE7F 

ld a , ( 7FE£ ) 

779* 

F £00 

CP 00 

779C 

C0 

fai nz 

7790 

110330 

ld da, 0003 

77*0 

215816 

ld hl.lBSB 
cali 03B5 

77*3 

COS 503 

77*5 

1809 

jf 7781 

77*8 

110300 

ld da, 0C03 

77*6 

2 140 1F 

ld h l ■ 1F40 
cali 03B5 

77*6 

CDB503 

7761 

CO407* 

cali 7*40 

77B4. 

3*F07F 

ld a , ( 7FF0 ) 
CP 00 

77B7 

F600 

7769 

C0 

fai nz 

776* 

3*cD7F 

ld a , (7FE0) 

/760 

F£06 

CP 06 

7 7BF 

F *C977 

JP a , 77C9 

7 7C2 

6D5F 

Ida . r 

bi l 0,a 

77C4. 

C647 

77C6 

CC407* 

cali Z, 7*4.0 

77C9 

3*F07F 

ld a , (7FF0) 
CP 00 

77CC 

FE00 

77C6 

C0 

rai nz 

77CF 

188* 

jf 7788 

7701 

3E02 

ld a, 02 

7703 

CO0116 

cau 1801 

7706 

3E16 

ld a, 16 

7708 

07 

r ai 10 

7709 

3*£97F 

ld a , (7FE9> 

77DC 

07 

f s l 10 

7700 

3*E77F 

ld a , (7FE?) 

7760 

07 

rs i 10 

7761 

3E20 

ld a, 20 

f » l 10 

7763 

07 

7764- 

CD8E02 

cau 028E 

7767 

05 

puah de 

7768 

3*EB7F 

ld a, (7FEB) 

7766 

FE00 

CP 00 

7760 

280F 

Jf Z.77FE 

CP ® l , -- 

776F 

F601 

77F1 

2373 

Jf Z , 7866 

77F3 

FE02 

CP 02 

77F6 

C*C078 

jp X.78C0 

77F6 

FE03 

CP 03 

77F* 

C*3679 

jp Z , 7936 

77FO 

C9 

fai 

77F5 

77PF 

01 

pop dt 

79 

ld a,$ 

7330 

D500 

sub 00 

7332 

03 

push da 

7833 

2013 

jr nz,78io 
ld b , 00 

7835 

0500 

7337 

0EOP 

ld C,0P 

7339 

1511 

ld d , 11 

7333 

1613 

ld a , 13 

7330 

C0437C 

cali 7043 

7310 

3003 

jf nc.7310 

7312 

21627F 

ld h l , 7FE9 

7313 

35 

dac (hi) 

7315 

33 

dac (hi) 

7317 

216R7F 

ld hl,7FE« 

731* 

34 

ine (hi) 


7313 

13 1C 

jr 7339 

7 310 

01 

POP 1 « 

7316 

73 

U è , i 

73 IP 

05 36 

sub 02 

7321 

03 

push 3t 

7 3 92 

2913 

j r 02*7839 

7324 

3300 

U b * OO 

7 3 25 

020P 

1*3 C*OF 

7323 

31 

14 3 , C 

7 3 29 

1211 

13 « * 11 

7329 

C0437C 

CiU 7C43 

7 3^6 

3009 

jr OC a 7339 

733 3 

2I697F 

13 hU7F£9 

73 33 

34 

ine (hi) 

7 3 34 

34 

ine (hi) 

73 35 

212*7P 

13 hi, 7F2* 

73 33 

35 

3 « C (hi) 

7 3 39 

2 1677F 

13 h l * 7F67 

>3 3C 

34 

ine (hi) 

73 30 

3*6* 7F 

13 è * <7P2*) 

73 ld 

47 

L 1 b * 1 

7 34 1 

3*S77F 

13 i * (7P27) 

7344 

03 1F 

sub 1F 

7349 

30 

ì 3 3 » < b 

7347 

30 

*33 * a b 

7343 

47 

13 b * 1 

734 9 

2003 

jr 02*7853 

7349 

36 01 

13 * * 4l 

7340 

32237F 

l 3 (7F29) * * 

7338 

3*6 7 7F 

13 * * (7P27) 

7333 

F 2 13 

CP 13 

7333 

2 0 O C 

jr 02*7333 

7337 

3*2 97F 

1.3 * , ( 7 P 2 2 ) 

733* 

F 630 

CP 00 

7 3 3C 

2003 

jr 02 * 7933 

7356 

3201 

13 1*01 

7333 

32237F 

13 (7F23) * * 

7333 

C33079 

jp 7990 

7335 

01 

POP 3 1 

7337 

79 

13 a * • 

7333 

0311 

SUb 11 

733* 

05 

push 3 1 

7333 

2017 

j r n 2 * 7394 

7330 

0510 

13 b*10 

733F 

43 

13 C*b 

7373 

130* 

13 3*0* 

7372 

120C 

1 3 * * 0 C 

7374 

C0437C 

C*U 7C43 

7377 

3033 

j r OC * 7334 

7379 

21277F 

13 hl*7P27 

737C 

35 

3 c e (hi) 

7870 

35 

d t e (hi) 

7876 

2 1E*7F 

ld h l * 7FE* 

7851 

34 

ine (hi) 

7882 

18 1C 

jr 78*0 

7584 

DI 

POP dt 

7885 

76 

ld a i 

78e6 

0619 

SUb 19 

7888 

05 

PUSh 3 1 

7669 

2015 

jr nz,7e*0 

7866 

0616 

ld baie 

7880 

48 

ld Cab 

78 86 

160* 

ld d * 0* 

7899 

1E0C 

ld «a0C 

7822 

C0437C 

cau 7C43 

7895 

3009 

jr nca?8*0 

7897 

21E77F 

ld h l a 7FE7 

782* 

34 

ine (hi) 

7896 

34 

ine (hi) 

762C 

2 1E*7F 

ld hU7FE« 

789F 

35 

dtc (hi) 

78*0 

21E97F 

ld h l a 7FE9 

78*3 

35 

dee (hi) 

78*4 

3*E*7F 

ld * a ( 7FE*) 

78*7 

47 

ld bai 

78*8 

3*E97F 

ld a a ( 7FE9 ) 

78*B 

3C 

ine a 

?8*C 

90 

sub b 

78*0 

90 

SU b b 

78*6 

2007 

jr n 2 a 7887 

7660 

3E02 

13 a, 02 

7882 

32EB7F 

ld ( 7FEB ) i a 

7865 

1813 

jr 78C* 

7887 

3*E?7F 

ld a a (7FE7) 

785* 

F£ 19 

CP 19 

785C 

200C 

j r nr,7ec* 

7836 

3*E97F 

ld a a (7FE9) 

78C1 

FE09 

CP 09 

78C3 

2005 

jr ni ,78C* 

78C5 

3E02 

ld aa02 

78C7 

326B7F 

ld (7FEB) «a 

78C* 

C39079 

jp 7990 

78C0 

01 

POP dt 

78C6 

7B 

ld a a« 

78CF 

0606 

sub 0E 

7801 

05 

push dt 

7802 

2018 

jr nz,7eEC 

7804 

06OE 

ld ba0E 


7806 

0210 

ld C.10 

7808 

1601 

ld d.ei 

780* 

1603 

id 

780C 

CD437C 

CIU 7C43 

780P 

300B 

jf nc ,78EC 

7861 

2 1E97F 

ld h l , 7FE9 

78E4 

34 

ine (hi) 

78E5 

34 

ine (hi) 

7866 

21ER7F 

ld hl,7FEfl 

7869 

34 

ine (hi) 

78E* 

1810 

jf 7S09 

78EC 

01 

pop da 

7860 

76 

ld *z! 

78EE 

0600 

sub 00 

78F0 

05 

push dt 

78F1 

2016 

jf nz,7909 

78 F 3 

0602 

ld b , 0E 

78P5 

0210 

ld C,10 

78F7 

1603 

ld d , 03 

78F9 

1E0S 

ld t, 05 

78F6 

C0437C 

cali 7C4.3 

73FC 

3009 

jf nc,7909 

7900 

21297F 

ld h l , 7F29 

7903 

35 

dac (hi) 

7204 

33 

dtc (hi) 

7905 

2 12*7P 

ld hl,7PEfl 

7203 

33 

dtc (hi) 

7909 

21577F 

ld h l . 7FS7 

790C 

33 

dtc (hi) 

7200 

3*2*7P 

ld a , (7PSA) 

7910 

47 

ld b.a 

7911 

3*27?P 

ld a . (7FS7) 

7914 

3C 

ine a 

7913 

90 

su b b 

7915 

20 

su b b 

791? 

2007 

jf nz,79aa 

7919 

3203 

ld a, 03 

7913 

32287F 

ld (7FEB) , a 

7915 

1313 

jf 7933 

7920 

3*277F 

ld a , (7Fe7) 

7223 

F 3 07 

CP 07 

7923 

2 0 OC 

Jf nz , 7933 

79 2 7 

3*2 27F 

ld a , ( 7FE9) 

722* 

F202 

cp 09 

722C 

2005 

jf nz,7933 

7 2 22 

32 0 3 

ld a , 33 

7 23 0 

32237F 

ld (7FE3) , a 

7 233 

C32079 

JP 7950 

7935 

01 

PO» dt 

7937 

73 

id a , a 

7933 

0519 

sub 19 

7 2 3* 

03 

push da 

7938 

2013 

jf n z , 7933 

7930 

0301 

ld b , 01 

7 2 3F 

0203 

ld C , 03 

7941 

13 09 

ld d , 09 

7243 

1208 

ld a. 03 „ 

7243 

C0437C 

cau 7Ci3 

7948 

3003 

jf nc.7933 

724* 

21577F 

ld h l , 7FS7 

7940 

34 

ine (hi) 

7 242 

34 

ine (hi) 

7 9 4P 

2 12*7F 

ld h l , 7PEA 

7252 

34 

ine (hi) 

7933 

1310 

jf 7979 

7933 

01 

pop da 

7933 

78 

id a , a 

7937 

0311 

sub il 

7959 

03 

push da 

793* 

2013 

jf nz , 7979 

793C 

0303 

ld b , 03 

7932 

0203 

ld C , 03 

7930 

1309 

ld d , 09 

7932 

1203 

ld a, 03 

7934 

C0437C 

cali 7C43 

793? 

3009 

jf n C , 7979 

7939 

21277F 

ld h l , 7F57 

795C 

33 

dtc (hi) 

7930 

33 

dac (hi) 

7932 

2 12*7F 

ld hl,7PEfl 

7971 

33 

dac (hi) 

7972 

21297P 

ld h l , 7F59 

7975 

34 

ine (hi) 

7973 

3*2*7P 

ld a, (7F5fl) 

7979 

47 

ld b.a 

797* 

3*297F 

ld a , ( 7F29) 

7970 

0313 

sub 13 

797F 

30 

a d d a , b 

7930 

30 

add a , b 

79 31 

2007 

jf nz, 793(9 

7933 

3200 

ld a, 09 

7933 

32237F 

ld ( 7FS3 ) ,a 

7988 

1313 

jf 7990 

793* 

3 * 2 7 7 F 

ld a , (7FS7) 

7980 

FE07 

CP 07 

798F 

200C 

jf nz,7990 

7991 

3*297F 

ld a , (7FE9) 

7994 

FE0D 

Cp 00 
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7996 

2005 

jf nz,?99D 

7*40 

07 

fai ld 

7819 

18E6 

jf 7801 

7996 

3E00 

ld i ,ea 

7*48 

3* 837F 

ld a. (7P23) 

7B1B 

0E0F 

ld C ,0F 

799* 

32EB7F 

ld (7FEB) .1 
ld h 1/5823 

7*51 

07 

fai ld 

7610 

060F 

Cd b > 0F 

7990 

210058 

7*32 

3R867F 

ld a , (7FE8) 

76 1F 

1601 

ld d ,01 

79*0 

112000 

id de, 0020 

7*33 

07 

rai ld 

7821 

1E0S 

ld t a 05 

79*3 

3*E97F 

ld 1 , (7FE9) 

7*36 

3*847F 

ld a , (7PE4) 

7623 

CD637C 

C 4 l l 7C63 

79*6 

47 

ld b,a 

7*59 

47 

ld b , a 

7B26 

D2307B 

j P fi C i 7030 

79*7 

19 

add h l , de 

7*3* 

3*S*7F 

ld a , (7PER) 

7629 

3RE27P 

ld a i (7FE2) 

79*6 

10FO 

djnz 79R7 

7*30 

90 

SUb b 

7B2C 

Ei 

pop hi 
add a * i 

79** 

E056E77F 

ld d« , ( 7FE7 ) 
«dd h l , d« 

7*38 

2602 

id i,aa 

7820 

65 

79*6 

19 

7*60 

2307 

jf Z , 7R39 

76 2E 

85 

add a 1 1 
sub es 

79*F 

7E 

ld 1 , (h l) 

7*32 

F2337* 

jp p ,7flaa 

7B2F 

0602 

79B0 

0600 

ld b,ee 

7*65 

2600 

ld l , dd 

7831 

32E27F 

ld (7FE2) , a 

79B2 

FE02 

cp ®2 

7*67 

1302 

jf 7RÓ3 

7834 

3RE47F 

ld a , (7FE4) 

7964 

200B 

jf nz ,79C1 

7*59 

2601 

ld l,dl 

7837 

85 

add a , i 

7966 

3*EC7F 

ld a , 17FEC) 

7*53 

63 

puah hi 

7333 

30 

deca 

79B9 

30 

dee a 

7*3C 

3R637F 

ld a . (7PE3) 

7839 

32847F 

id (7Fe4) , a 

79B* 

32EG7F 

ld (7FEC) , « 

7*6F 

F602 

cp da 

793C 

83 

puah hi 

79B0 

060* 

ld b , 0R 

7*71 

C*347* 

jp z,7R84 

7930 

21S07F 

ld h l , 7 P £ 3 

796F 

1800 

jf 79CE 

7*74 

F601 

CP di 

7940 

34 

ine (hi) 

79C 1 

FE05 

CP 05 

7*76 

C*097* 

jp Z,7RO0 

7341 

3*847P 

ld a , (7FE4) 

79C3 

2009 

jf nz,79CE 

7*79 

F600 

CP dd 

7344 

47 

i d b > a 

79C5 

3*EC7F 

ld • , (7FEC) 

7*73 

0*1378 

jp z,7aia 

CP 03 

7345 

3*207F 

ld a » (7PE3) 

79C6 

30 

dee • 

7*78 

F603 

7846 

30 

add a . b 

79C9 

32EC7F 

ld (7FEC) ,1 

7*30 

0*5678 

jp z,7aaa 

7849 

80 

add a>b 

79CC 

069B 

ld b , 9B 

7*33 

09 

fai 

704* 

06 1F 

sub 1F 

79CE 

C5 

puah bC 

7*34 

0606 

ld b,3Z 

7840 

2003 

jf n Z , 7856 

79CF 

3E10 

ld 1,1® 

7*36 

0606 

ld C,08 

7948 

3803 

ld a, 03 

79D1 

07 

rei 10 

7*33 

150P 

ld d , 0P 

7650 

32237F 

ld (7PE3) ,1 

7902 

3E02 

ld a, 02 

7*3* 

1613 

ld t i 13 

7353 

C33F70 

jp 783F 

7904 

07 

f * t 10 

?*ac 

C0337C 

cali 7CS3 

7356 

3 * 2 0 7 F 

ld a,(7FE0) 
CP li 

7905 

3E16 

ld • , 16 

7*3F 

02*57* 

jp nc,7RR8 

7359 

F813 

7907 

07 

f S l 10 

7*92 

3R627F 

id a , (7psa> 

7353 

C23F70 

JP n Z i 783P 

7908 

3*E97F 

ld « , (7FE9) 

7*95 

81 

POP h l 

7058 

3R227F 

ld a , (7FE2) 
CP 03 

79DB 

07 

fai 10 

7*96 

93 

tubi 

7331 

FE 33 

790C 

3*E77F 

ld a , (7FE7) 
rs i 10 

7*97 

93 

sub l 

7333 

C23F73 

jP nz .788F 

79DF 

07 

7*93 

0602 

add a, da 

7333 

1326 

jf 734S 

79E0 

3*EB7F 

ld a , (7FEB) 

7*9* 

32627F 

id (7Pgai , a 

ld a , l 7PS4) 

7338 

0510 

ld b , 18 

79E3 

C69C 

add a,9C 
f a t 10 

7*90 

3 * 6 4 7 F 

733* 

0210 

ld C,10 

79E5 

07 

7**3 

33 

add a , l 

7330 

1200 

ld a ,08 

79E6 

21P37F 

ld hl,7FF3 

7**1 

30 

dee a 

7338 

1600 

ld d , ®8 

79E9 

7E 

ld a , (h U 

7**2 

32E47F 

ld ( 7FE4 ) , a 

7970 

C0637C 

cali 7C53 

79E* 

CI 

POP bC 

7**5 

E5 

puah hi 

7373 

21 

pop hi 

79EB 

80 

add a>b 

7**6 

21E07F 

ld hl,7FE® 

7874 

3023 

jf nc,7393 

79EC 

27 

daa 

7**9 

35 

dCC (hi) 

7373 

3*2 47F 

ld a , (7FE4) 

79E0 

77 

ld (hi) « a 

7*** 

3R647F 

ld a , (7PE4) 

7379 

F202 

CP 03 

79 EE 

28 

dee hi 

7**0 

47 

ld b,a 

7979 

2007 

jf n Z , 7884 

79EF 

7E 

ld a , (h l) 

7*RE 

3RE07F 

ld a , (?FE©> 

7370 

70 

ld 1,1 

79F3 

CE00 

ad c a , 00 

7*61 

3C 

ine a 

7376 

F202 

2002 

CP 02 

79F2 

27 

daa 

7*82 

90 

sub b 

7330 

jf n Z , 7384 

79F3 

77 

ld (hi) .a 

7*B3 

90 

sub b 

7332 

1312 

jf 7898 

79F4 

28 

dee hi 

7*B4 

2008 

jf nz,7R6E 
ld a, di 

73 5 4 

3R207F 

ld a , (7FS0) 

79P5 

7E 

ld a , (h l) 

7*B6 

3E01 

7337 

93 

sub l 

79F6 

CE00 

adc a. 00 

7*B8 

32E37F 

ld (7FE3) ,1 

7333 

93 

sub i 

79P0 

27 

daa 

7*BB 

C3BF7B 

jp 7BBP 

7889 

0602 

add a, 32 

79F9 

77 

ld (hi) ,a 
ld a, 16 
fai 10 

7*BE 

3*E07F 

ld a,(7FE©> 

CP 07 

7383 

3 2 2 3 7 P 

ld (7FE0) , a 

79F* 

3E16 

7*C 1 

FE07 

7388 

3R247F 

ld a , ( 7PS4) 

79FC 

07 

7*C3 

C2BF7B 

jp nz,7SBF 

7991 

35 

add a , i 

79F0 

3E07 

ld a,07 
fai 10 

7RC6 

3RE27F 

id a , (7FEa) 

CP OD 

7992 

30 

dee a 

79FF 

07 

7*C9 

FE0D 

7893 

32247F 

ld ( 7FE4) , a 

7*0® 

3E0O 

ld a, 00 

7*CB 

C26F7B 

jp fiZ , 7BBF 
jf 7RB6 

7336 

23 

puah hi 

7*02 

07 

fai 10 

7*CE 

1866 

7397 

21227F 

ld h l , 7FE2 

7*03 

C0837C 

cali 7C63 

7*00 

0601 

ld b , 0 1 

73 2* 

34 

ine (hi) 

7*06 

3E07 

ld a, 07 

7*02 

0E05 

ld C , 05 

7398 

3R247F 

ld a , (7FE4) 

7*08 

3*EC7F 

ld a,(?FEC) 

CP 00 

7*04 

160* 

ld d , OR 

7398 

47 

ld b,a 

7*08 

FE00 

7*06 

1E0* 

ld e, OR 

739F 

3R227F 

ld a , (7FE2) 

7*00 

2011 

jf nz ,7A20 

ld a ,01 

7*08 

C0637C 

cali 7C63 

73*2 

30 

add a , b 

7*0F 

3E01 

7*08 

3014 

jf nc ,7RF1 

79*3 

80 

add a , b 

7*11 

32227F 

id <?FE£>,a 
ld a , (7PEÓ) 

7*00 

3RE07F 

ld a , (7FE0) 

73*4 

0615 

sub 19 

7*14 

3*207P 

7*E0 

61 

pop hi 

76*6 

2007 

jf nz , 7BRF 
ld a, 02 

7*17 

PE09 

CP 09 

7*E 1 

85 

add a , l 

76*3 

3202 

7*19 

2003 

jf nz,7Ra® 
ld a, <32 

7*E2 

65 

add a,l 
sub OS 

76** 

32237F 

ld (7F53) , a 

7*18 

3602 

7*E3 

0602 

70*0 

1310 

jf 783F 

7*10 

32227F 

id (7Fesi , a 

7*65 

32E07F 

ld (7FE0) ,a 

78*F 

3R207F 

ld 1,(7FE0) 
CP 13 

7*20 

3R877F 

ld a , (7F27) 

7*E8 

3*E47F 

ld a , (7FE4) 

7882 

F213 

7*23 

47 

ld b,l 

7*EB 

85 

add a , l 

7034 

2009 

jf n Z j 738P 
ld 1 , (7FE2) 
CP 00 

7*24 

3*e07F 

ld a, (7PE0) 

7*EC 

30 

dee a 

7006 

3R227F 

7*27 

83 

CP b 

7*E0 

32E47F 

ld (7FE4) , a 

7089 

F20O 

7*23 

2014 

jf I1Z.7A32 

7*F0 

E5 

puah hi 

7833 

2002 

jf nz , 78BF 

7*2* 

3*697F 

ld a , ( 7FE3) 

7*F 1 

21E27F 

ld h l , 7FE2 

7000 

1389 

Jf 73R8 

7*20 

47 

ld b,a 

7*F4 

35 

dee (hi) 

703F 

210033 

ld hi, 5330 
ld 1 , (7FE2) 

7*28 

3R827F 

ld a. (7PE2> 

7*F5 

3*E47F 

ld a , (7FE4) 

7002 

3R227F 

7*31 

63 

CP b 

7*F8 

47 

ld b,a 

7803 

47 

ld b , a 

7*32 

200* 

Jf nz»7R3C 
ld a, 03 

7*F9 

3*E27F 

ld a , (7FE2) 

7806 

112000 

ld da, aaao 

7*34 

3603 

7*FC 

3C 

ine a 

7BC9 

19 

add hi, de 

7*36 

32287P 

ld (7FE£),1 

7*F0 

90 

sub b 

76C* 

10F* 

djnz 7BC6 

7*39 

3601 

ld a, 01 

7*FE 

90 

au b b 

7BCC 

EO5BE07F 

ld dt , (7FE0) 

7*38 

326F7F 

ld (7FEF) , a 

7*FF 

2008 

Jf nz,?B09 

7000 

19 

add h l , de 

7*36 

01 

pop da 

7601 

3E00 

id 1,00 

7001 

7E 

ld a, (hi) 
ld (7FE5) , a 

7*3F 

C3 

fai 

7603 

32E37F 

ld (7FE3) , a 

7602 

32E57F 

7*40 

3616 

ld a, 13 

7606 

C3BF73 

JP 7BBF 

7B05 

FE02 

CP 02 

7*42 

07 

f*l 10 

7609 

3*E07F 

ld a , (7FE0) 

7007 

2007 

jf nz,7BE0 
ld a , 9R 
ld (7FE6) , a 

7*43 

3*627F 

ld a , (7FE2) 

7B0C 

FE07 

CP 07 

7609 

3E9* 

7*46 

07 

fai 10 

7608 

C2BF78 

jp nz , 7BBF 

7606 

32E67F 

7*47 

3*607F 

ld a , (7FE3) 

7611 

3*E27F 

ld 1,(7FE2> 

CP 09 

7B0E 

1810 

jf 7BF® 

7*4* 

07 

fai 10 

7614 

FE09 

78E0 

FE05 

CP 05 

7*43 3E10 
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id a, 10 

7816 

C2BF7B 

jp nz » 7BBP 

?es 2 

2007 

jf n Z , 7BEB 


7BE4 

3E9B 

ld è j 98 

78E6 

32E67F 

ld (7FE6) ,4 

73E9 

1605 

j r 7BF0 

76E8 

3E20 

id a. 20 

78ED 

32E67F 

ld C7FE6) ,4 

7BF0 

E 1 

POP hi 

7BF1 

E05P 

Ida , r 

76F3 

FE05 

CP 05 

7BF5 

F2127C 

jP P , 7C 12 

7BF6 

3*E57F 

ld a j ( 7FE5 ) 
CP 02 

7BFB 

FE02 

7BF0 

2013 

jf nz,7C12 
ld a, 05 

78FF 

3E05 

7001 

32E57F 

ld (7FE5) , a 

7004 

3E90 

ld a , 96 

7006 

32E67F 

ld (7FE6) ,4 

7009 

116400 

ld de,0O64 

7C0C 

213200 

ld hi, 0032 

7C0F 

CO8503 

cali 0365 

7012 

3E16 

ld a. 16 
rat 10 

7014 

D7 

7015 

3*E27F 

ld a , (7FE2) 

7C18 

07 

rat 10 

7019 

3RE07F 

ld a , ( 7FE0 ) 
rat 10 

70 1C 

07 

7010 

3E10 

ld a, 10 
rat 10 

70 1F 

07 

7020 

3E01 

id a ,01 

7022 

07 

rat 10 

7023 

3PE37F 

ld a , (7FE3 ) 

7025 

C69C 

add a , 9C 
rat 10 

7028 

07 

7029 

3*E77F 

ld a , (7F27) 

7C2C 

47 

ld b,a 

7020 

3*207F 

ld a, (7FE0) 

7030 

33 

CP b 

7031 

200F 

j r nz,7C42 

7033 

3R297F 

ld a , ( 7F29 ) 

7035 

47 

ld b,4 

7037 

3*227F 

ld a , (7F22) 

703* 

83 

CP b 

7033 

2003 

jr nz,7C42 
ld a , 01 
ld <7 FF0) ,a 

7030 

3201 

7C3F 

32F07F 

7042 

09 

rat 

7043 

3*277F 

ld a , (7F27) 

7046 

83 

CP b 

7047 

F*607C 

jP lì , 7C60 

704* 

2044 

n*g 

7040 

ai 

add a,c 
jP 11,7030 

7040 

F*337C 

7030 

3*297F 

ld a , (7FE9) 

7053 

3* 

CP d 

7034 

F*507C 

jP il,7C60 

7037 

£0 4 4 

nag 

7059 

83 

add a,t 

j P n , 7080 

705* 

F*507C 

7030 

37 

scf _ _ 

7053 

1302 

jr 7062 

7030 

37 

ac f 

7061 

3F 

cc r 

7062 

09 

rat 

7063 

3*E07F 

ld a , (7FE0) 

7066 

88 

CP b 

7067 

FR807C 

jp a, 7080 

706* 

E044 

nag 

7C6C 

7060 

B1 

FP807C 

add l;C 
jp 1,7080 

7070 

3*E27F 

ld a , (7FE2) 

7073 

e* 

CP d 

7074 

FR807C 

jp 1,7080 

7077 

E044 

ntg 

7079 

83 

add a,t 

jp l,7C80 

707* 

F*607C 

7070 

37 

ac ( 

7C7E 

1802 

jr 7082 

7080 

37 

ac f 

7061 

3F 

cc f 

7082 

C9 

rat 

7083 

3E10 

ld a, 10 

7085 

07 

rat 10 

7086 

3E04 

ld a, 04 

7086 

07 

rat 10 

7089 

3E00 

id a, 00 

7080 

E067 

ffd , 

7060 

F5 

puah af 

7086 

C630 

add 1,30 
rat 10 

7090 

07 

7091 

Fi 

pop a f 

7092 

E06F 

r ld 

7094 

23 

ine hi 

7C95 

0602 

ld b , 02 

7097 

E06F 

r ld 

7099 

F5 

puah af 

709* 

0630 

add a, 30 
rat 10 

7C9C 

07 

7C90 

FI 

pop ir 


7C9E 

E06F 

f ld 

70*0 

F5 

pu»h «r 

7CR1 

C630 

«dd 4,30 

7CR3 

07 

rst 10 

7CP4 

FI 

pop a r 

70*5 

E06F 

f ld 

70*7 

23 

ine hi 

70*3 

10ED 

djnz 7C9? 

7CP* 

C9 

f « 1 

70*8 

210*00 

id hi, 000 * 

7CRE 

110*00 

id dt.eeaa 
id «.le 
rst le 

7081 

3E16 

7083 

07 

7084 

3RE27F 

ld 4 , (7fE2) 
rst 1® 

7087 

07 

7083 

3R207F 

id • , i7rea) 
ri t i« 

7080 

07 

7030 

3210 

id i,ia 
rst ia 

7C32 

07 

7C3F 

?SSà 

32*0 

id a, a® 
rst ia 
id a,R® 
ri i ia 

7CC4 

07 

7CC5 

03 

push dt 

7CC6 

£3 

PUSh hi 

7007 

CO0303 

CU 3333 

700* 

210053 

ld hi. 33 33 

7000 

2043277F 

ld be, (7PE7 
add hl.be 
ld a , <7F£2> 

7001 

09 

7C02 

3*227F 

7C03 

47 

ld b , a 

7006 

112000 

id dt.aasa 

7009 

19 

add hi ,d* 
djnz 7C09 

700* 

l'0FD 

7C0C 

£D3? 

Ida . r 

7CD2 

2507 

and 37 

7050 

77 

ld (hi) ,a 

7021 

£1 

POP hi 

7CE2 

01 

POP dt 

7023 

23 

ine hi 

7024 

70 

id a . i 

7CE3 

F23* 

CP 3* 

7027 

2000 

jr nz»7CC3 

7C29 

10 

dtc dt 

7C2* 

78 

ld a ,t 

7020 

F£0 1 

cp ai 

7020 

2006 

jr nz,7CC3 

7C2F 

C9 

rtt 

7CF0 

2R783C 

ld hi, (3C73 

7CF3 

011000 

id be.aaia 
add hi , bc 

7CF8 

09 

7CF7 

20 

tx dt , h l 

7CF3 

219070 

ld hi, 7030 

7CF8 

011000 

id be.aaia 

7CF2 

£030 

idi r 

7D00 

3E02 

ld a, 03 

m 

Sl?è 16 

cau ìeei 
id a , ia 

7D07 

07 

rat i® 

7D08 

3E04 

ld a, 04 

rst l® 

700* 

07 

7008 

21BD7D 

ld hi, 7030 

7O0E 

7E 

ld a , ih l) 

7O0F 

FE33 

CP 33 

7011 

2828 

jr Z.703E 

7013 

57 

ld d , a 

7014 

E6C0 

and C0 

7016 

CB07 

rie a 

7018 

CB07 

rie a 

701* 

C690 

add a, 9® 

70 1C 

07 

rst 10 

7010 

7* 

id a ,d 

70 1E 

E630 

and 30 

7020 

CB3F 

srl a 

7022 

C63F 

srl a 

7024 

CB3F 

sri a 

7026 

CB3F 

sr i a 

7028 

C690 

add a, 90 
rst 10 

702* 

07 

7028 

7* 

ld a , d 

702C 

E60C 

and OC 

702E 

CB3F 

sr i a 

7030 

CB3F 

sri a 

7032 

C690 

add 4,90 
rst 10 

7034 

07 

7035 

7* 

ld a,d 

7036 

E603 

and 03 

7038 

C690 

add a, 90 
rst 10 

703* 

07 

7038 

23 

ine hi 

703C 

1800 

jr 7O0E 

703E 

2R7B5C 

ld hi, (SC76 

7041 

011000 

id bc.eai® 

7044 

09 

add h l , bC 

7045 

E8 

tx de ,h l 
ld hl,?ORO 

7046 

21*070 

7049 

011000 

ld bc , 0010 


7D4C 

EOB0 

Idi r 

704E 

212058 

ld hi, 5820 

7051 

11667E 

ld d t , 7E66 

7054 

1* 

ld 4 , (d«> 

7055 

FEDD 

CP DD 

7057 

0*8070 

jp Z , 7080 

705* 

CB7F 

bit 7,4 

705C 

049*70 

cali nz , 709* 

705F 

23 

ine hi 

7060 

0877 

bit 6, a 

7062 

049*70 

cali nz,709* 

7065 

23 

ine hi 

7066 

CB6F 

bit 6, a 

7068 

049*70 

cali nz,7D9* 

7068 

23 

ine hi 

706C 

0867 

bit 4, a 

706E 

049*70 

cali nz,709* 

7071 

23 

ine hi 

7072 

C65P 

bit 3, a 

7074 

049*70 

cau nz,709* 

7077 

23 

ine hi 

7078 

0857 

bit 2, a 

707* 

C49R7D 

cau nz,709* 

7070 

23 

ine hi 

7D7E 

CB4P 

bit 1 , a 

7060 

049*70 

cali nz,7D9* 

7083 

23 

ine hi 

7064 

0847 

bit 0 , a 

7086 

049*70 

cau nz,7D9* 

7089 

23 

ine hi 

708* 

13 

ine dt 

7083 

13C7 

jr 7034 

7030 

21337C 

ld h 1 j 7E03 

7030 

72 

ld a , (h U 

7091 

FEFP 

CP FF 

7093 

03 

r« t i 

7094 

23 

ine M 

7093 

£3 

puah hi 

70 96 

07 

rst 10 

70 97 

£1 

pop h l 

7098 

13F6 

jr 7090 

709* 

3602 

ld (hi) ,02 

709C 

C9 

rat 

7090 

00 

nop 

7092 

00 

OOP 

709F 

00 

nop 

70*0 

00 

nop 

70*1 

00 

nop 

70*2 

00 

nop 

70*3 

00 

nop 

70*4 

00 

nop 

70*5 

00 

nop 

70*6 

00 

nop 

70*7 

00 

nop 

70*8 

1313 

jr 7002 

70** 

00 

nop 

70*3 

00 

nop 

70*0 

00 

nop 

70*0 

13 13 

jr 70C7 

7D*F 

OC 

ine e 

7000 

0F 

r r e a 

7031 

03 

ine bC 

7032 

30 

nop 

7023 

30 

nop 

7034 

30 

nop 

7033 

1313 

jr 70CF 

7037 

3OF0 

jr ne, 70*9 

7039 

CO 

rat nz 

703* 

00 

nop 

7033 

00 

nop 

7030 

00 

nop 

7030 

30 

add a,b 

7032 

00 

nop 

703F 

00 

nop 

7OC0 

30 

nop 

700 1 

30 

nop 

70C2 

00 

nop 

70C3 

00 

nop 

70C4 

0* 

id a , (be) 

70C5 

7F 

ld a ,4 

70C5 

FF 

rst 39 

70C7 

FF 

rst 33 

70C3 

FF 

rst 30 

7009 

FF 

rst 39 

700* 

FP 

rst 30 

7DC3 

FF 

rst 30 

70C0 

P378 

or 79 

70CS 

00 

nop 

70CF 

00 

nop 

7000 

2*3000 

ld hi, (0330) 

7003 

00 

nop 

7004 

86 

or (hi) 

7003 

77 

id (hi) ,a 

7006 

FF 

rst 38 

7007 

FF 

rst 33 

7006 

FF 

rst 33 

7009 

FF 

rst 36 
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700 * 

FF 

rat 34 

7230 

77 

ld (hi) ,a 

7287 

019617 

ld bc,l?96 

id e , 00 

7003 

FP 

rat 34 

7232 

30 

add a , b 

7EB* 

1200 

7DDC 

75 

hall 

723F 

00 

nop 

7EBC 

1008 

djnz 7EC8 

7000 

77 

ld (hU , a 

7240 

2*3000 

ld hi, (0880) 

7EBE 

97 

sub a 

7DDE 

50 

add • . b 

7243 

03 

dtc bc 

7EBF 

00 

dee e 

7DDF 

00 

nop 

7244 

73 

hall 

72C0 

00 

dee e 

7DE0 

2*5080 

14 hU (8080) 

7243 

77 

ld (h l) , a 

72C 1 

17 

ria 

7DE3 

0B 

d« C bC 

7245 

FP 

rai 38 

72C2 

02 

ld (bC) ,a 

7DE4 

75 

ha It 

7247 

FP 

rai 38 

7EC3 

00 

nop 

70E5 

77 

ld (MI .« 

7248 

PP 

rai 33 

72C4 

95 

tub (hi) 

70E6 

7F 

Id l ,l 

7e49 

FP 

rai 38 

72C5 

17 

r la 

70E7 

FF 

rat 38 

724* 

FP 

rai 38 

7EC6 

1C 

ine « 

70E5 

FF 

r» t 38 

7243 

FF 

rai 38 

72C7 

00 

nop 

70E9 

FF 

rat 38 

724C 

76 

hall 

7EC8 

97 

sub a 

7DE* 

6* 

ld l,d 

7240 

73 

id a , b 

72C9 

00 

dee e 

70EB 

*7 

and • 

7242 

00 

nop 

72C* 

00 

dee e 

70EC 

76 

ha It 

724? 

00 

nop 

72CB 

17 

r la 

70EO 

77 

ld (hi) ,a 

7230 

2R3000 

ld hi, (3333) 

72CC 

04 

ine b 

70EE 

78 

Id a , b 

7233 

00 

nop 

72C0 

00 

nop 

7DEF 

00 

nop 

7234 

83 

or (hi) 

7206 

95 

aub (hi) 

7DF9 

00 

nop 

7255 

7F 

id a , a 

72CF 

17 

ria 

70F1 

06 

d« c bC 

7235 

FP 

rai 33 

7200 

14 

ine d 

70F2 

6fl 

Id l ,d 

7257 

PP 

rat 38 

7201 

00 

nop 

70F3 

P7 

and « 

723 3 

2R8PPP 

jp Pe,Ff*8? 
rat 38 

7202 

94 

aub h 

70F4 

76 

ha 1 t 

7255 

PP 

7203 

17 

r la 

70F5 

77 

Id (hi) >a 

7230 

F330 

or 83 

7204 

1* 

ed 

i a a (da) 

70F6 

76 

hau 

7252 

00 

nop 

7203 

00 

nop 

70F7 

RR 

xor d 

723F 

00 

nop 

7206 

97 

sub a 

70F6 

RR 

xor d 

7230 

00 

nop 

7207 

00 

dtC C 

70F9 

R7 

and a 

7231 

00 

nop 

7205 

17 

re 

a 

7DF* 

6R 

ld l ,d 

7239 

00 

nop 

7209 

1590 

Cd 

l d a 90 

70FB 

R7 

and a 

7233 

00 

nop 

7203 

40 

Cd 

I e, e 

70FC 

76 

ha 1 1 

7234 

0* 

ld a , (bc) 

7200 

41 

Cd 

b j C 

70FD 

77 

ld (h l > , a 

7233 

33 

ine ap 

7200 

53 

Cd 

« a b 

70FE 

78 

ld a , b 

7233 

7 P 

id a , a 
rat 33 

7206 

00 

dee e 

70FF 

00 

nop 

7237 

FP 

720F 

17 

r la 

7E00 

00 

nop 

7235 

PP 

rat 33 

7220 

0330 

Cd 

b, 33 

7E01 

06 

dee bc 

7239 

PC 4000 

cali », 004.0 

7222 

25 

aub (hi) 

7E32 

60 

add a , b 

7250 

00 

nop 

7223 

17 

ria 

7203 

06 

dtc bc 

7260 

04 

ine b 

7224 

12 

Cd 

(de) ,a 

7204 

76 

hall 

7232 

5F 

ld a ,» 

7223 

90 

nop 

7E05 

75 

ld a ,t 

723F 

FF 

rat 38 

7225 

97 

sub a 

7206 

67 

or a 

7270 

FP 

rat 33 

7227 

17 

rea 

7207 

FF 

r » l 38 

7271 

F 4 30 03 

cau 0,0030 

7223 

15 

dtc d 

7208 

FF 

rs t 38 

7274 

00 

nop 

7229 

00 

nop 

7E09 

FF 

f » l 38 

7E75 

14 

ine d 

722* 

53 

Cd 

d j t 

720* 

FF 

f 1 1 38 

7E76 

57 

ld d,a 
rat 38 

7223 

43 

Cd 

bat 

7208 

F7 

f » l 30 

7277 

FP 

7220 

4P 

Cd 

e ,a 

7E0C 

66 

or (hi) 

7E78 

F 0 

rat P 

7220 

52 

Cd 

d ad 

7E0D 

7B 

ld a ,« 

7E79 

14 

ine d 

7222 

45 

Cd 

bai 

7202 

67 

or a 

7E7* 

54 

ld d,h 

722P 

00 

die e 

7E0F 

60 

add a,b 

7276 

00 

nop 

72F0 

17 

r la 

7E10 

00 

nop 

?e7C 

1014 

djnz 7E92 

72F1 

07 

r tea 

7E11 

08 

d«C bC 

7E7E 

54 

ld d ,h 

72F2 

99 

nop 

7212 

60 

add a,b 

7E7F 

00 

nop 

72F3 

53 

Cd 

dat 

7E13 

67 

or a 

7E80 

1014 

djnz 7E96 

72P4 

53 

Cd 

h , t 

7214 

66 

or (hi) 

7262 

54 

ld d ,h 

72P3 

5P 

Cd 

C al 

7E15 

78 

id a,t 

7283 

00 

nop 

72F5 

72 

Cd 

(hi) ad 

7E16 

67 

or a 

7684 

1014 

djnz 7E9fl 

72F7 

33 

Cd 

h a C 

7E17 

6R 

ld l ,d 

7286 

55 

ld d , l 
rat óe 

72P3 

3*9017 

Cd 

la (1700) 

7E10 

RR 

xor d 

7287 

FF 

72P3 

0309 

Cd 

b a 0 0 

7E19 

R7 

and a 

7288 

FF 

rat 38 

7eP0 

93 

abe a , b 

7E 1* 

6R 

ld l ,d 

72e9 

045500 

cali ne, 0055 

72F2 

17 

r la 

7E1B 

77 

ld (hi) ,a 

7280 

1054 

djnz 7EE2 

72PP 

12 

Cd 

(dt ) a a 

7E1C 

66 

or (hi) 

728E 

65 

ld d , l 

7F00 

09 

nop 

7E10 

76 

id a,« 

7E8F 

00 

nop 

7F01 

93 

sub t 

7E1E 

67 

or a 

7290 

1054 

djnz 7EE6 

7F32 

17 

rea 

7E1F 

60 

add a , b 

7292 

55 

l d d , l 

7F03 

14 

ine d 

7220 

li 

nop 

7293 

00 

nop 

7F04 

33 

nop 

7221 

dtc bc 

7294 

1054 

djnz 7EER 

7F03 

92 

sub d 

7E22 

6R 

ld 1,4 

7296 

55 

ld d , l 
rat 38 

7F35 

17 

rea 

7223 

77 

ld (h l) , a 

7297 

FF 

7P07 

1* 

Cd 

a , (de) 

7224 

85 

or (hi) 

7298 

F0 

rtt p 

7F03 

39 

nop 

7225 

77 

ld (hi) ,a 

7299 

54 

ld d ,h 

7F09 

99 

abe a, e 

7225 

77 

ld (hi) ,a 

729* 

54 

ld d ,h 

7F0* 

00 

dee e 

7227 

FF 

rat 38 

7296 

00 

nop 

7F03 

00 

dece 

7225 

FP 

fi l 38 

729C 

00 

nop 

7F0C 

17 

ria 

7229 

PF 

fi l 38 

7290 

54 

ld d ,h 

7F0O 

33 

tx 

af ,ir 

7222 

5R 

ld lid 

7292 

67 

ld d ,a 

7F06 

0 0 

nop 

7225 

77 

ld (hi) ,1 

769F 

FF 

rat 38 

7F0F 

8 

sub (hU 

722C 

76 

hall 

72R0 

FF 

rat 38 

7F10 

rea 

7220 

77 

ld (hi) ,a 

7ER 1 

045000 

cali ne, 9050 

7F11 

12 

Cd 

(dt) ,a 

7222 

75 

ld a i b 

72R4 

00 

nop 

7F12 

00 

nop 

7E2F 

fi 

nop 

72R5 

14 

ine d 

7F13 

97 

sub a 

7233 

00 

nop 

72R6 

5F 

ld M 

7F14 

17 

rea 

7231 

00 

nop 

7ER7 

FF 

rat 38 

7F13 

14 

ine d 

7232 

80 

add l,b 

72R8 

FF 

rat 38 

7F15 

33 

nop 

7233 

87 

or a 

7ER9 

F44000 

cali p, 004.0 

7F17 

96 

SUb (hi) 

7234 

78 

hau 

72RC 

00 

nop 

7F13 

17 

rea 

7235 

77 

id (hi) «a 

72R0 

04 

ine b 

7F19 

1800 

jr 

7F16 

7235 

7F 

i d a , a 

72R2 

7F 

ld a, a 

I7F1B 

97 

aub a 

7237 

FF 

rat 38 

7ERF 

FF 

rat 38 

7K1C 

0D 

dee e 

7233 

FF 

r*l 38 

7280 

FF 

rat 38 

7F1D 

17 

r la 

7239 

FF 

rai 38 

7281 

FCDD16 

cali n , 16DD 

?r 12 

09 

add hl.be 

723* 

FF 

rat 38 

7264 

00 

nop 

7P1F 

00 

nop 

7235 

F7 

rat 30 

7EB5 

00 

nop 

7K20 

4C 

Cd 

Cah 

?e3C 74 
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hall 

7266 

15 

dee d 

7F21 

89 

Cd 

C aC 


7K2 2 

DÒ 

ld h,lhl) 

7PÓÒ 

1618 

jr 7P6d 

7K62 

1624 

jr 7FD0 

7K23 

65 

Id hi l 

7P66 

1610 

Jr 7P62 

7K64 

24 

ine h 

7K24 

3A0D17 

ld * , (1700) 

7K6A 

dC 

ine e 

7Kb 5 

lòdd 

jr 7FB7 

7K27 

dò 

«x * 1 , e t * 

7K66 

OP 

r r ce 

7Kb? 

dd 

nop 

7K 26 

dd 

OOP 

7K6C 

03 

ine bc 

?Kbò 

Cd 

re i po 

7K29 

92 

sub d 

7P60 

dd 

nop 

?Kb9 

4C 

ld Cj(hl) 

7 r2A 

17 

r le 

7K6E 

dd 

nop 

7KbR 

64 

ld h,h 

7 K26 

12 

ld (pc) ,à 

7P6P 

dd 

nop 

?Kbb 

KF 

rii 38 

7K2C 

dd 

OOP 

7P7d 

1618 

jr ?reR 

7KbC 

FF 

ni 38 

7K2D 

93 

sub c 

7P72 

30P0 

]r nc,7P64 

7KBD 

64 

ld h * h 

7K2E 

dD 

dee c 

7P74 

Cd 

rei ni 

7Kb£ 

4E 

ld C e (h U 

7K2F 

dD 

dee c 

7P76 

dd 

nop 

?KbK 

Cd 

rei po 

7K3d 

17 

r l e 

7P7ó 

dd 

nop 

7KCd 

168R 

Jr 801C 

7K31 

dòdd 

id b.ee 

7F77 

dd 

nop 

7KC2 

7E 

ld e e (hi) 

71-33 

92 

sub d 

7P78 

dd 

nop 

7KC3 

6R 

ld e ed 

7K34 

17 

r le 

7P79 

dd 

nop 

7KC4 

1860 

jr 7F83 

7K35 

14 

ine d 

7P7R 

00 

nop 

7KCo 

FF 

rii 36 

7K36 

dd 

nop 

7P7b 

PP 

ni 38 

7KC7 

99 

ibe è e e 

7K37 

96 

sub l 

7P7C 

PP 

ni 38 

7KCQ 

07 

r Ice 

7K36 

17 

r le 

7P70 

3C 

ine e 

7KC9 

72 

ld (hi) ed 

71-39 

lòdd 

jf 7P3B 

7P7E 

1618 

jr 7P98 




7K36 

93 

sub « 

7Pbd 

1616 

Jr 7P9R 

7KCH 

2 OFF 

ld h i FF 

7K3C 

do 

dee e 

7P62 

3C 

ine e 

7KCC 

FF 

ni 38 

7K3D 

do 

dee e 

7P63 

PP 

ri l 36 

7KCD 

2672 

ld h e 72 

7K3E 

17 

r le 

7P84 

PP 

rii 38 

7KCK 

07 

rlce 

7K3 K 

04 

ine b 

7P6S 

dd 

nop 

?KDd 

99 

ibe èiC 

7K40 

dd 

nop 

?Kòd 

dd 

nop 

7KD1 

FF 

ri t 36 

7K41 

92 

sub d 

7P67 

dd 

nop 

7KD2 

bD 

CP l 

7K42 

17 

r le 

7P6Ò 

dd 

nop 

7KD3 

IÒSA 

jr 802F 

?K43 

IR 

ld e , (de) 

7P09 

dd 

nop 

7KD6 

7E 

ld e e (hi) 

7K44 

dd 

nop 

7P6R 

dd 

nop 

?KDó 

6R 

ld * > d 

7K46 

93 

sub « 

7Pób 

03 

ine bc 

7KD7 

lòdd 

Jr 7FD9 

7K46 

dO 

dee e 

7P6C 

dP 

r r ce 

7PD9 

4d 

ld b e b 

7K4? 

dD 

dee e 

7P6D 

dC 

ine e 

7KDR 

1610 

jr 7FEC 

7K4Ó 

17 

f le 

7K6E 

1618 

jr 7PR6 

7KDC 

1E89 

ld e >69 

?K49 

d2 

ld (bC) , « 

7P9d 

dd 

nop 

?KD£ 

Cd 

rei nz 

?K4h 

dd 

nop 

7P91 

dd 

nop 

7KDK 

60 

èdd è/b 

?K4b 

92 

sub d 

7P92 

00 

nop 

?Ktd 

dEdd 

ld Ce30 

7K4C 

17 

r le 

7P 93 

Cd 

re t nz 

7KE2 

13 

me de 

71-4.0 

1C 

ine e 

7P94 

Pd 

re i p 

7PE3 

02 

ld (bC) «e 

7K4E 

dd 

nop 

7P95 

3018 

jr nc,7pRP 




7K4F 

93 

sub e 

7P97 

1618 

jr 7PB1 

7KK4 

010420 

ld bc « 2004 

?Kód 

dO 

dee e 

7P99 

181C 

Jr 7P67 

7KC7 

0F 

rrce 

7KS1 

00 

dee e 

7P96 

IP 

C fé 

7KE6 

00 

nop 

7K62 

92 

sub d 

7K9C 

IP 

r r è 

7KE9 

13 

ine de 

7K63 

17 

r le 

7P90 

1C 

ine e 

7KEA 

dlddFF 

ld bCeFFdd 

7K54 

1E00 

id c,ee 

7F9E 

1818 

jr 7PB8 

7KED 

010000 

ld bCedddd 

7K66 

93 

sub e 

7PRd 

lòia 

jr 7P6R 

7KF0 

00 

nop 

?Kb? 

PK 

rst 36 

7PR2 

36P8 

jr c,?P9C 

7KK1 

00 

nop 

7K5Ò 

dd 

nop 

7PR4 

P8 

rei n 

7KK2 

dd 

nop 

?Kò9 

dd 

nop 

7PRS 

3818 

jr C i 7PBF 

?rK3 

dd 

nop 

7K6A 

dd 

nop 

7PR7 

lòdd 

jr 7PR9 

7KK4 

dd 

nop 

?KbÒ 

PP 

rst 36 

7PR9 

dd 

nop 

7PF8 

6d 

ld deb 

71- 5C 

PP 

rst 36 

7PRR 

dd 

nop 

7KK6 

00 

nop 

?KbD 

dd 

nop 

7PR6 

lòie 

Jr 7PCB 

7KK7 

010374 

ld bc 1 7463 

7 Kò£ 

dd 

nop 

7PR0 

dd 

nop 

7KKR 

65 

ld h e l 

7K6F 

dd 

nop 

7KAE 

dd 

nop 

7KKB 

76 

he II 

?K6d 

loie 

jr 7F7« 

7PRP 

dd 

nop 

7KKC 

65 

ld he l 

7K62 

1618 

jr ?f*?C 

7Pbd 

dd 

nop 

7KKD 

0636 

ld b e 36 

7K64 

1618 

jr 7K7E 

7Pbl 

dd 

nop 

7FPF 

93 

sub « 
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di Jason Lane 

trad. e adatt. 

di Angelo Motta 


Azione, avventura, pericolo, alla 
ricerca del tesoro del re! 


I n questo gioco dovrete avventurarvi al- 
l’interno di una montagna, dove è stato 
seppellito un re Inca, alla ricerca dei suoi 
favolosi tesori. 

L’impresa non sarà facile: dovrete supe- 
rare diverse difficoltà e insidie nascoste 
cercheranno di ostacolarvi. 

Il gioco, scritto da un ragazzo di 13 anni 
che ha dimostrato di avere molta dimesti- 
chezza nel programmare lo ZX81, richie- 
de parecchio tempo per la digitazione, 
ma alla fine il risultato vi ripagherà sicura- 
mente dello sforzo sostenuto. 


Inca Tomb 

versione per ZX81 16K 


3 LET h «500 

4 LET h»«"ZX 81" 

5 GOTO 8000 


10 

LET S«0 

a shiNT 

RT 

20 

PRINT 

li 

30 

PRINT 

li 

40 

PRINT 

• i 

50 

PRINT 

il 

60 

PRINT 

1 1 

70 

PRINT 

1 1 

50 

PRINT 

1 1 

90 

Il ' 

PRINT 

• • 

£0 

■ il 

PRINT 

1 1 


PRINT 

il 





220 LET Y «29 

230 LET A«8 

240 LET B«19 

250 PRINT RT A,B;"0" 

260 IF R«X AND B*Y ThEN GOTO 50 
00 

270 IF INKEY Ì*"Q" ThEN GOSUB 36 

0 

280 IF XNKEYt» aa P“ THEN GOSUB 41 

0 

290 IF X=s8 ThEN GOTO 600 
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30© PRINT AT X , Y; " 

310 PRINT AT A , B; ” M 

320 LET A*A + 1 

330 LET B«B + 1 

340 IP A=21 THEN GOTO 230 

350 GOTO 250 

360 LET 5=5+10 

370 PRINT AT X,Y;" " 

380 LET X =X - 1 
390 LET Y =Y - 1 

395 IF A «X AND B=Y THEN GOTO 50 

0 

400 RETURN 

410 PRINT AT X , Y; " " 

420 LET X=X-2 

430 PRINT AT X,Y;"*" 

440 LET X=X+2 

450 IF A=X-1 THEN GOSUB 500 
46© LET 5=5-5 

470 PRINT AT X-2,Y;" " ; AT X,Y;" 
*" 

480 RETURN 

500 FOR F ■ 1 TO 3 

510 PRINT AT A , 8; " " 

520 LET A=A+ 1 
530 LET 6=6+1 
54© PRINT AT A,B;"0" 

55© NEXT F 
560 RETURN 

600 LET S=5+INT (RND*200) 

610 IF INKEY * = "P" AND X=8 THEN 
GOSUB 700 

620 IF INKEY *s"Q" THEN GOSUB 36 

0 

630 IF X = 7 THEN GOTO 5100 

640 LET S =S +2 

650 PRINT AT X,Y;"*" 

660 IF X«2 THEN GOTO 800 

670 GOTO 610 

700 PRINT AT X,Y;" " 

710 LET X=X-2 

720 PRINT AT X , Y; " *" , AT X,Y;" " 

730 LET Y *Y -2 

740 PRINT AT X,Y; "*" 

750 RETURN 
800 LET S-S+100 

810 IF INKEY t*“Q" THEN GOSUB 90 
0 

820 IF INKEY * •" P " AND Y>4 THEN 
GOSUB 950 

830 IF Y =5 OR Y =7 OR Y = 10 OR Y» 
12 THEN GOTO 5200 
840 IF Y =3 THEN GOTO 1010 
850 PRINT AT X,Y;"*" 

860 GOTO 810 

900 PRINT AT X,Y;" 

910 LET Y=Y-1 

920 PRINT AT X,Y;"*" 

93© RETURN 

950 PRINT AT X,Y;" 

960 LET X=X-2 

970 LET Y =Y -2 v „ 

980 PRINT AT X,Y;"*";AT X,Y;" 
990 LET X=X+2 
1000 RETURN 

1010 PRINT AT 12,3; ’• ";TAB 3J " 

; TAB 3 ; ";AT 12 , 1; " ■" ; AT 13,2;" 
I " ' fìT 14 2 ’ " 1" 

1020 PRINT' AT 12,1;" " ; AT 13,2;" 
" ; AT 14 , 2 ;" ";RT 12 , 0 ;"i";at 13 
,i;"V;RT 14,2; "S" , ^ 

1030 pfclNT AT 12,0;" " ; AT 13,1; ‘ 
" , RT — m4 , 8; " ";RT 13,0; ""V ;RT 1 

1040 PRINT AT 13,0;" " ; AT 14,2; 

" " ; AT 15,0; "■■■" 

1050 LET A = 1 

1060 IF INT (RND*10) =1 AND A=1 T 

HEN GOSUB 1500 , ^ 

1070 IF A=0 AND INT (RNDtl0) =0 T 
HEN GOTO 1010 


1080 IF INKEY*="P" THEN GOTO 110 
0 

1090 GOTO 1060 
1100 PRINT AT X,Yi" 

Ìi20 print*at 2 x,y; "*"; at x,y;" 

1130 LET Y=Y-2 

1140 PRINT AT X,Y;"*" 

1150 IF INT (RND*6) =0 THEN GOSUB 
1500 

1160 FOR X=X TO 19 . _ 

1170 IF A«1 AND X=14 THEN PRINT 
AT x-l,Y; " "; AT x,Y; "#" 

1175 IF A=1 AND X=14 THEN GOTO 2 
000 

1180 PRINT AT X-1,Y;" " ; AT X,Y;" 
#" 

1190 NEXT X 

1200 FOR F=1 TO 10 

è 2 10 PRINT AT X-1,Y;" " ; RT X,Y;" 
" ; AT X,Y; "*"; AT x,Y;"+";AT X,Y; 

" ♦" 

1220 NEXT F 
1230 CLS 

1240 PRINT AT 3,0; "HA CHI CREDEU 

I DI ESSERE? FORSE S 

U P E R H A N?" 

1250 PRINT , , "LA FANTASIA TI HA 
GIOCATO UN BRUTTO SCHERZO FAC 

ENDOTI LAN- CIARE DAL PRECIPIZ 

IO" 

1260 GOTO 6090 

1500 PRINT AT 15,0;" ",AT 13,0 
; ••■li" ; at 14,2; "■";at 13,0;" ";A 

T 14,2;" " ; AT 12,0;".";AT 13,1;" 

at I4,a; "V; AT 12,0;" " ; at 13 
,1;" "; AT 14,2;" " ; AT 12,l;"l";A 
T 13,2, AT 14,2; " I" i AT 12,1;" 

f "; AT 13,2, " I "; AT 14,2; " I " 
1510 LET A=0 
1520 RETURN 
2000 LET S=S+300 

2010 IF INKEY8="0" THEN GOSUB 21 
00 

2020 IF Y =6 THEN GOTO 2200 
2040 LET S=S-INT (RND#10) 

2050 GOTO 2010 

2100 PRINT AT X,Y;" " 

2110 LET Y=Y+ 1 

2130 PRINT AT X,Y;"t" 

2140 RETURN 

2200 IF INKEY t="0" THEN GOSUB 23 
00 

2210 IF Y =7 THEN GOTO 2400 
2220 LET S=S-INT (RND»10) 

2230 GOTO 2200 

2300 PRINT AT X,Y;" " 

2310 LET X=X+1 
2320 LET Y =Y + 1 
2330 PRINT AT X,Y;"*" 

2340 RETURN 

2400 LET S=S+50 

2410 IF Y *9 THEN GOTO 2500 

2420 IF INKEY •*"0" THEN GOSUB 81 

00 

2430 IF INT (RND*10) =5 THEN GOTO 
6000 

2440 GOTO 2410 

2500 IF INKEY* <>"Q" THEN GOTO 26 
00 

2510 PRINT AT X,Y;" " 

2520 LET X=X-1 
2530 LET Y =Y ♦ 1 
2540 PRINT AT X,Y;"*" 

2550 IF INT (RND*5) «0 AND Y>8 AN 
D Y < *12 THEN GOTO 3000 
2560 IF INKEY *»"0" THEN GOSUB 26 
00 

2570 IF Y = 14 THEN GOTO 3500 
2580 GOTO 2550 
2600 PRINT AT X,Y;" 


SUPERSINC® 1/85 63 


" ; RT 12, 
";AT 13, 8;"^ 
at 18, 10 ;"F"; 

14,2;" Jb"; 


2610 LET Y *Y + 1 
2620 PRINT RT X,Y;"#" 

2630 LET S-S+10 
2640 RETURN 
3000 PRINT RT 11,9;" 

10J " " ; RT 12,1 

■P "; RT 14,9; 

”i3,e," 

§i 

3006 PRUSE 2 

3007 NEXT F 

3010 FOR F * 1 TO 50 
3020 NEXT F 
3030 CLS 

3035 LET 5-S-20O 

3040 PRINT RT 3,0; "UHOOPS ...."; A 
T 5,0; "LR PRRETE DELLA GROTTR E" 
CROL- LRTR E SEI MORTO FRR LE N 
RCERIE" 

3050 GOTO 6090 
3060 CLS 

3600 LET S-S+100 

3505 PRINT RT X-4,15;"Ì" 

3510 LET X»X-1 
3520 LET Y-Y+l 

3530 PRINT RT X+1,Y-1;" " ; RT X,Y 

. n ^ * • 

3540 IF INKEY Ì*"P" TMEN GOSUB 36 

00 

3545 IF RND < • 05 TMEN GOTO 3700 

3550 IF RND <.01 THEN GOTO 3570 

3555 LET 5*5-5 

3560 GOTO 3540 

3570 FOR F *1 TO 30 

3580 NEXT F 

3685 CLS 

3590 PRINT RT 3,0;" OM OH ,..";R 
T 5,0; "STRUI QUASI PER FARCELA M 
R UN GROSSO COBRA TI MR STRITO 
LATO FRR LE SUE SPIRE" 

3595 GOTO 6090 

3600 IF INT (RND*10)«1 TMEN GOTO 
3700 

3610 PRINT RT X,Y;" " 

3620 LET X*X-2 

3630 PRINT RT X,Y;"*";AT X,Y;" " 

3640 LET X*X+2 

3650 PRINT RT X,Y;"#" 

3660 RETURN 

3700 PRINT RT X,Y;" " ; RT X-3,Y;" 
#";AT X-3,Y;" ";RT x,Y;"*i" 

3710 PRINT RT 0,0;"URRRM "i 

RT 2,0, "HAI TROUATO IL TESORO DE 
L RE INCR ED IL TUO PUNTEGGIO 
RT- TURLE AMMONTA R ";S+100; 
" PUNTI." 

3715 PRINT "ORA SARAI RIPORTATO 
RI PIEDI DELLA MONTAGNA PER U 

Nfl NUOUR GARA" 

^ t J";RT 1 
5 TMEN GOTO 

3900 

1740 PRINT RT 21 , "J 


hC t r 


3750 IF INKEY* OCMRS 118 TMEN GO 
TO 3750 
3760 CLS 
3770 GOTO 11 

3900 PRINT RT 15 , 14; "L ." ; RT 16, 
14; "P 4" ; RT 17,15; "k 1" 

3910 FOR F *1 TO 10 
3920 PRINT RT X,Y;" " 

3930 NEXT F ^ 

3940 PRINT RT 15 , I4jj«i" ; RT 16 , 
14j_lHÌ";RT 17, 15; "■■^RT 16,10 

;"Éq^Ki;R T l?,10 i "|fcÉ",AT 18, 



ni x r , * v , 

' ; RT 19,10; 


3945 FOR F * 1 TO 20 

3946 NEXT F 
39^7 CLS 

3950 PRINT RT 9 , 0; "PURTROPPO LA 
TERRA £■ FRANATA PRIMA CHE TU 
ABBIA POTUTO USCI- RE E SEI STAT 
0 INGHIOTTITO DALLAMONT RGNA" 

3960 GOTO 6090 
5000 FOR F * 1 TO 30 
5010 NEXT F 
5015 LET S*S-100 
5020 CLS 

5030 PRINT RT 3,0, "OM CARO 

SEI STATO BLOCCATO GIR" DAL PRIM 
0 OSTACOLO." 

5040 PRINT ,, "FORSE SE NON SEI A 
TLETICO TI CONUIENE RINUNCIAR 
E RL TESORO DEGLI INCA." 

5050 GOTO 6090 

5100 FOR F *7 TO 20 

5110 PRINT RT X , Y ; " " ; RT F , Y; " #" 

, RT F-l ,Y; " " 

5120 NEXT F 

5130 FOR F * 1 TO 30 

5135 PRINT RT 20 ,Y; “**" ; AT 20, Y;" 

+" ; RT 20 ,Y; "X" ; AT 20, Yj " " 

5140 NEXT F 
5150 CLS 

5155 LET S *S-200 

5160 PRINT "SBADATO .... STRI AT 
TENTO AI CREPACCI." 

5170 PRINT , , "ORA IL TUO CORPO G 
IACE CARBO- NIZZRTO FRA LA LAU 
R ARDENTE" 

5180 GOTO 6090 
5200 FOR X *X TO 7 

5210 PRINT RT X,Y;"*";AT X,Y;" " 

5230 NEXT X 

5240 FOR F ■ 1 TO 20 

5246 PRINT RT X,Y;" " ; RT X,Y;"*" 

; RT X,Y; "X"; AT X,Y; 

5250 NEXT F 

5260 CLS 

5265 LET S*S-50 

5270 PRINT RT 3,0,"OOOOOOH 

";RT 5,0, "SEI CADUTO NEI CRATERI 
DELLR MONTAGNA." 

5280 GOTO 6090 

6000 PRINT RT 16,7;" " ; AT 16 , 9 

; AT 17,7; "■!■" ; RT 16,9; V"; AT 
17,7," RT 18,7; " AT 16,9;" 
I" ; AT 17,8;" I" ; RT 18,7," |" 

6010 FOR F*16 TO 20 
6020 PRINT RT F,Y;"*";AT F-1,Y;" 


6030 NEXT F 

6040 PRINT RT 20 , Y RT 20, Y; " 

il 

6050 FOR F ■ 1 TO 30 
6060 NEXT F 
6070 CLS 

6080 PRINT RT 3,0; "CHE SFORTUNA. 

";AT 5,0; "IL UECCMIO PONTE 

CHE STAUI AT- TRAUERSRNDO E* DI 
COLPO CROLLA- TO E SEI MORTO AF 
FOGATO" 

6090 PRINT RT 20,0; "IL TUO PUNTE 
GGIO E 4 : ";S 

6091 IF S >H TMEN GOSUB 9000 


6092 PRINT RT 16,0, "IL RECORD OD 
IERNO E" DI ";h;" 

6093 PRINT RT 16,0; "IL RECORD OD 
IERNO E* DI "; M; " 

6094 PRINT "PUNTI ED E" STATO Ffì 

TTO DR: ";H* 



6098 IF IN 
TO 6098 
6100 CLS 


116 TMEN GO 
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GOTO 10 

S«vE " INCA TOMB" 

wR* 

00 PRINT RT 0,8; " 


>05 PRINT TRB 8; "1 
>006 PRINT TRB 8; “ 



mcn 


IT nm B 


>010 PRINT TRB 8;"| 



8015 PRINT RT 19,0; "| 

8020 IF INKEY **"5" THEN GOTO 803 
0 

8025 IF INKEYÌ*"N" THEN GOTO 10 
3026 GOTO 8020 
8030 CLS 

sas* T gsa tfu«^" ■ ■ 

8060 PRINT , , "SEI UN INTREPIDO E 
SPLORRTORE CHESI RUUENTURR NELLR 
MONTAGNA SA-CRA DOUE E" STATO 
SEPOLTO UN REINCR CON IL SUO FR 
UOLOSO TESORO CHE DOURRI TROURRE 

l* 

8070 PRINT "L 1 RUUENTURR NON SRRR 



■ FACILE: DO-URRI SUPERARE DIUERS 
I OSTACOLI EFfiRE MOLTA RTTENZION 
E ALLE INSI-DIE NASCOSTE." 

8080 PRINT , , "PER MUOUERTI USR I 
TASTI: ""P" " PER SALTARE" 

8090 PRINT 0"" PER RU ANZARE" 

8100 PRINT , , "m^^m^BBBUONA FO 
RTUNf 



3180 IF INKEYSOCHI 
SUB 8180 
8190 CLS 
8200 GOTO 10 


118 THEN GO 


9000 PRINT RT 16,0; "HAI FATTO IL 
NUOUO RECORD INSERISCI IL 

TUO NOME" 

9010 INPUT M$ 

9020 IF H t = " " THEN LET H|«"UN AN 
QNIMO" 

9030 LET H«S 
904-0 RETURN 

9998 SAUE " INCA TOMB" 

9999 RUN 


LIBRERIA JACKSON 



A Milano, 

in via Mascheroni 14. 
La prima software 
libreria italiana 


JT 


A Milano, in via Mascheroni 14. 

Tel. 02-437385 


Vieni a trovarci: 

ti aspettiamo. 


Un tempo si andava in libreria per il gusto della 
scoperta, per il piacere di esser informati sulle novità. 
Per incontrarsi, discutere, chiedere un consiglio al 
libraio-amico. Tutto questo è ancora possibile, per un 
prodotto assolutamente nuovo: libri e riviste di 
informatica italiani ed esteri, software, giochi. 


Dove? Alla Libreria JACKSON. 

La prima software - libreria italiana. 


s 
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parte seconda 

di Angelo Motta 


C ome premesso, pubblichiamo in 
questo numero il disassemblato di 
“Gizzy”. La composizione dello stesso 
è stata controllata e accuratamente 
corretta più volte: ciò nonostante, è 
possibile che queste pagine non siano 
del tutto esenti da errori. In caso di 
discordanze dei valori numerici dei co- 
dici decimali con quelli pubblicati sul 
numero 6, fate riferimento a questi 
ultimi (ricavati dal programma, perfet- 
tamente funzionante), tenendo pre- 
sente che il funzionamento del pro- 
gramma provoca naturalmente l’alte- 
razione dei valori di alcuni byte. In 
caso di ...emergenza, procuratevi un 
valore assolutamente corretto digitan- 
do PRINT PEEK (locazione desidera- 
ta), dopo avere caricato il programma 
registrato sulla cassetta allegata a 
questo numero o a quello precedente. 
Buon lavoro! 



BYTE 


16514 

16515 

16516 

16517 

16518 

16519 

16520 

16521 

16522 

16523 

16524 

16525 

16526 

16527 


HEXCODE DECIMALE MNEMONICI NOTE 

VARIABILI DEL LINGUAGGIO MACCHINA 

Contengono la posizione a video dello SCORE 

Contengono la posizione a video del RECORD 


Contengono la posizione a video del LEVEL 

Contengono la posizione a video del TIME 

Contengono il valore del RECORD massimo raggiun- 
to 

Contengono il valore dello SCORE durante la gara 

Contengono il valore del tempo (TIME) a disposizio- 
ne * 
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16528 

Contengono la posizione iniziale della coda di Gizzy 

16529 


16530 

Contengono la posizione della testa di Gizzy durante 

16531 

la gara 

16532 

Contengono la posizione della coda di Gizzy durante 

16533 

la gara 

16534 

Contatore dei puntini 

16535 

Doppio contatore della lunghezza di Gizzy 

16536 



ROUTINE DI INIZIALIZZAZIONE GIOCO 


16540 

2A 

OC 

40 

A2 

12 

64 

LD HL, (16396) 

Inserisce nelle locazioni 

16543 

01 

0B 

00 

1 

11 

0 

LD BC, 11 

16514/5 la posizione a 

16546 

09 



9 



ADD HL, BC 

video dello SCORE 

16547 

22 

82 

40 

34 

130 

64 

LD (16514), HL 


16550 

0E 

15 


14 

21 


LD C, 21 

idem nelle locazioni 

16552 

09 



9 



ADD HL, BC 

16516/7 per la posizione 

16553 

22 

28 

40 

34 

132 

64 

LD (16516), HL 

a video del RECORD 

16556 

0E 

0E 


14 

14 


LD C,14 

idem per il LEVEL nelle 

16558 

09 



9 



ADD HL, BC 

locazioni 16518/9 

16559 

22 

86 

40 

34 

134 

64 

LD (16518), HL 


16562 

0E 

OE 


14 

14 


LD C, 14 

idem per il TIME nelle lo- 

16564 

09 



9 



ADD HL, BC 

cazioni 16520/1 

16565 

22 

88 

40 

34 

136 

64 

LD (16520), HL 


16568 

01 

B9 

02 

1 

185 

2 

LD BC, 697 

inserisce nelle loc. 

16571 

09 



9 



ADD HL, BC 

16528/9 la posizione ini- 

16572 

22 

90 

40 

34 

144 

64 

LD (16528), HL 

ziale della testa di Gizzy 

16575 

21 

8A 

40 

33 

138 

64 

LD HL, 16522 

Azzera il RECORD inizia- 

16578 

36 

00 


54 

0 


LD (HL), 0 

le 

16580 

23 



35 



INC HL 


16581 

36 

00 


54 

0 


LD (HL), 0 


16583 

01 

00 

00 

1 

0 

0 

LD BC, 0 

Azzera la variabile L 

16586 

C9 



201 



RET 



SUBROUTINE PER IL LAMPEGGIO DELLA TESTA DI GIZZY 


16587 

10 

FE 

16 254 

DJNZ - 2 

16589 

36 

97 

54 151 

LD (HL), 151 

16591 

10 

FE 

16 254 

DJNZ - 2 

16593 

36 

17 

54 23 

LD (HL), 23 

16595 

OD 


13 

DEC C 

16596 

20 

F5 

32 245 

JR NZ - 11 

16598 

C9 


201 

RET 

16599 

00 


0 

NOP 


SCRITTE DEL GIOCO (FINALI) 


16600 

33 

51 

N 

16601 

3A 

58 

U 

16602 

34 

52 

O 
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16603 

3B 

59 

V 


16604 

34 

52 

0 


16605 

00 

0 


SPAZIO 

16606 

37 

55 

R 


16607 

2A 

42 

E 


16608 

28 

40 

C 


16609 

34 

52 

0 


16610 

37 

55 

R 


16611 

29 

41 

D 


16612 

39 

57 

T 


16613 

2A 

42 

E 


16614 

32 

50 

M 


16615 

35 

53 

P 


16616 

34 

52 

0 


16617 

00 

0 


SPAZIO 

16618 

38 

56 

S 


16619 

28 

40 

C 


16620 

26 

38 

A 


16621 

29 

41 

D 


16622 

3A 

58 

U 


16623 

39 

57 

T 


16624 

34 

52 

0 



SUBROUTINE DI AGGIORNAMENTO PUNTEGGIO 


16625 

2A 

8C 

40 

42 

140 

64 

LD (HL), 16524 

Aumenta di 1 il contatore 

16628 

23 



35 



INC HL 

del punteggio 

16629 

22 

8C 

40 

34 

140 

64 

LD (16524), HL 


16632 

2A 

82 

40 

42 

130 

64 

LD HL, (16514) 

Aumenta il punteggio di 

16635 

7E 



126 



LD A, (HL) 

1 a video 

16636 

FE 

25 


254 

37 


CP, 37 


16638 

20 

05 


32 

5 


JR NZ + 5 


16640 

36 

1C 


54 

28 


LD (HL), 28 


16642 

2B 



43 



DEC HL 


16643 

18 

F6 


24 

246 


JR - 10 


16645 

3C 



60 



INC A 


16646 

77 



119 



LD (HL), A 


16647 

C9 



201 



RET 






■IUV7VAT I77A 7IAAIE nei f e ita di Anu t 






ULLLl V AHI AulLI 


16648 

2A 

86 

40 

42 

134 

64 

LD HL, (16518) 

1 livello di gioco posto a 

16651 

36 

1C 


54 

28 


LD (HL), 0 

zero 

16653 

2A 

82 

40 

42 

130 

64 

LD HL, (16514) 

Azzera a video lo SCO- 

16656 

06 

05 


6 

5 


LD B, 5 

RE 

16658 

36 

1C 


54 

28 


LD (HL), 28 


16660 

2B 



43 



DEC HL 


16661 

10 

FB 


16 

251 


DJNZ - 5 


16663 

21 

A4 

40 

33 

140 

64 

LD HL, 16524 

Azzera il contatore dello 









SCORE 

16666 

36 

00 


54 

0 


LD (HL), 0 


16668 

23 



35 



INC HL 


16669 

36 

00 


54 

0 


LD (HL), 0 


16671 

21 

91 

41 

33 

145 

65 

LD (HL), 16785 

Ripristina il valore iniziale 
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16674 

16676 

16679 

16680 

16681 

16682 

16685 

16687 

16688 

16690 

16693 

16695 

16696 

16698 

16699 

16701 

16702 

16704 

16707 

16709 

16710 

16712 

16715 

16718 

16720 

16722 

16723 

16724 

16726 

16728 

16729 

16730 

16733 

16735 

16737 

16738 

16739 

16742 

16745 

16746 

16747 

16750 

16751 

16752 

16753 

16754 

16755 

16756 

16758 

16761 

16763 

16765 


36 

40 


54 

64 


' LD (HL), 64 

del ciclo di ritardo routine 
L/M 

2A 

86 

40 

42 

134 

64 

LD HL, (16518) 

Il livello di gioco viene au- 

7E 



126 



LD A, (HL) 

mentato di 1 

3C 



60 



INC A 


77 



119 



LD (HL), A 


21 

8E 

40 

33 

142 

64 

LD HL, 16526 

Nel contatore del TIME 

36 

DC 


54 

220 


LD (HL), 220 

viene inserito il valore 

23 



35 



INC HL 

1.500 

36 

05 


54 

5 


LD (HL), 5 


2A 

88 

40 

42 

136 

64 

LD HL, (16520) 

A video il TIME viene po- 

36 

1C 


54 

28 


LD (HL), 28 

sto a 1.500 

2B 



43 



DEC HL 


36 

1C 


54 

28 


LD (HL), 28 


2B 



43 



DEC HL 


36 

21 


54 

33 


LD (HL), 33 


2B 



43 



DEC HL 


26 

1D 


54 

29 


LD (HL), 29 


21 

97 

40 

33 

151 

64 

LD HL, 16535 

Il contatore doppio della 

36 

00 


54 

0 


LD (HL), 0 

lunghezza di Gizzy viene 

23 



35 



INC HL 

posto a zero 

36 

00 


54 

0 


LD (HL), 0 


2A 

90 

40 

42 

144 

64 

LD HL, (16528) 

La posizione iniziale della 

22 

94 

40 

34 

148 

64 

LD (16532), HL 

coda viene posta nei byte 

36 

15 


54 

21 


LD (HL), 21 

16532/3 e la coda viene 
stampata 

E4 

1C 


214 

28 


SUB A, 28 

In base al livello di gioco 

47 



71 



LD B,A 

determina la lunghezza 

AF 



175 



XOR A 

del corpo di Gizzy 

C6 

02 


198 

2 


ADD A, 2 


10 

FC 


16 

252 


DJNZ - 4 


47 



71 



LD B,A 

Stampa a video il corpo 

C5 



197 



PUSH, BC 

di Gizzy e memorizza le 

11 

21 

00 

17 

33 

0 

LD DE, 0 

posizioni a partire dalla 

ED 

52 


237 

82 


SPC HL, DE 

locazione 30720/1 

36 

34 


54 

52 


LD (HL),52 

E5 



229 



PUSH HL 

Il contatore della lunghez- 

EB 



235 



EX DE, HL 

za del corpo viene incre- 

01 

FE 

77 

1 

254 

119 

LD BC, 30718 

mentato di 2 per ogni 

2A 

97 

40 

42 

151 

64 

LD HL, (16535) 

pezzo. 

23 



35 



INC HL 


23 



35 



INC HL 


22 

97 

40 

34 

151 

64 

LD (16535), HL 


09 



9 



AHH HL, BC 


73 



115 



LD (HL), E 


23 



35 



INC HL 


72 



114 



LD (HL), D 


E1 



225 



POP HL 


CI 



193 



POP BC 


10 

E3 


16 

227 


DJNZ - 29 


11 

21 

00 

17 

33 

0 

LD DE, 0 

Stampa a video la testa 

ED 

52 


237 

82 


SBC HL, DE 

di Gizzy e memorizza la 

36 

17 


54 

23 


LD (HL), 23 

posizione nelle locazioni 

22 

92 

40 

34 

146 

64 

LD (16530), HL 

16530/1 
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16768 

41 

05 


65 

5 


LD A, 5 

Prima di dare il via al gio- 

16770 

CD 

CB 

40 

205 

203 

64 

CALL 16587 

co la testa di Gizzy lam- 

16773 

3D 



61 



DEC A 

peggia 

16774 

20 

FA 


32 

250 


JR NZ - 6 


16776 

3A 

91 

41 

58 

145 

65 

LD A, (16785) 

Incrementa la velocità del 

16779 

D6 

07 


214 

7 


SUB A, 7 

gioco 

16781 

32 

91 

41 

50 

145 

65 

LD (16785), A 



CICLO PRINCIPALE 


16784 

0E 

39 



14 

57 



LD C,57 

Ciclo di rallentamento del 

16786 

10 

FE 



16 

254 



DJNZ - 2 

gioco 

16788 

OD 




13 




DEC C 


16789 

20 

FB 



32 

251 



JR NZ • 5 


16791 

CD 

BB 

02 


205 

187 

2 


CALL 699 

Chiama dalla ROM la 

16794 

7C 




124 




LD A,H 

routine per la scansione 

16795 

C6 

02 



198 

2 



ADD A, 2 

della tastiera 

16797 

DA 

60 

42 


218 

96 

66 


JP C 16991 


16800 

44 




68 




LD B,H 


16801 

4D 




77 




LD C,L 


16802 

CD 

BD 

07 


205 

189 

7 


CALL 1981 


16805 

FE 




126 




LD A,(HL) 


16806 

01 

21 

00 


1 

33 

0 


LD BC, 33 

Viene controllato se il ta- 

16809 

2A 

92 

40 


42 

146 

64 


LD HL, (16530) 

sto premuto corrisponde 

16812 

FE 

21 



254 

33 



CP 33 

ad uno delle frecce. 

16814 

20 

03 



32 

3 



JR NZ + 3 


16816 

2B 




43 




DEC HL 

In questo caso nei registri 

16817 

18 

18 



24 

24 



JR + 24 

HL viene inserita la loca- 

16819 

FE 

22 



254 

34 



CP 34 

zione a video corrispon- 

16821 

20 

05 



32 

5 



JR NZ + 5 

dente alla direzione scel- 

16823 

A7 




167 




AND A 

ta. 

16824 

ED 

4A 



237 

74 



ADC HL,BC 


16826 

18 

OF 



24 

15 



JR + 15 


16828 

FE 

23 



254 

35 



CP 35 


16830 

20 

05 



32 

5 



JR NZ+ 5 


16832 

A7 




167 




AND A 


16833 

ED 

42 



237 

66 



SBC HL.BC 


16835 

18 

06 



24 

6 



JR + 6 


16837 

FE 

24 



254 

36 



CP 36 


16839 

C2 

60 

42 


194 

96 

66 


JP NZ 16992 


16842 

23 




35 




INC HL 


16843 

7E 




126 




LD A, (HL) 

Viene controllato se la 

16844 

FE 

TB 



254 

27 



CP 27 

posizione scelta dalla di- 

16846 

20 

5C 



32 

92 



JR NZ + 92 

rezione contiene un punti- 

16848 

ED 

4B 

97 

40 

237 

75 

151 

64 

LD BC, (16535) 

no e, io caso affermativo, 

16852 

03 




3 




INC BC 

provvede ad allungare il 

16853 

03 




3 




INC BC 

corpo Gizzy 

16854 

EB 




235 




EX DE, HL 

• 

16855 

21 

FE 

77 


33 

254 

119 


LD HL, 30718 


16858 

ED 

43 

97 

40 

237 

67 

151 

64 

LD (16535), BC 


16862 

09 




9 




ADD HL, BC 


16863 

ED 

4B 

92 

40 

237 

75 

146 

64 

LD BC, (16530) 


16867 

71 




113 



. 

LD (HL), C 


16868 

23 




35 




INC HL 


16869 

70 




112 




LD (HL), B 


16870 

60 




96 

r 



LD H,B 
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16871 

16872 

16874 

16875 

16877 

16880 

16883 

16886 

16887 

16889 

16891 

16895 

16896 

16897 

16899 

16901 

16904 

16905 

16907 

16909 

16912 

16913 

16915 

16918 

16919 

16921 

16923 

16925 

16926 

16929 

16931 

16932 

16934 

16935 

16938 

16940 

16942 

16944 

16946 

16947 

16950 

16952 

16955 

16958 

16960 

16963 

16966 

16970 

16972 

16975 

16977 

16978 

16979 


69 




105 



LD L,C 


36 

34 



54 

52 


LD (HL), 52 


EB 




235 



EX DE,HL 


36 

17 



54 

23 


LD (HL), 23 


22 

92 

40 


34 

146 

64 

LD (16530), HL 


CD 

FI 

40 


205 

241 

64 

CALL 16625 


3A 

96 

40 


58 

150 

64 

LD A, (16534) 

Controlla se Gizzy ha 

3D 




61 



DEC A 

mangiato l’ultimo punti- 

FE 

00 



254 

0 


CP 0 

no 

20 

2C 



32 

44 


JR NZ + 44 


ED 

4B 

8E 

40 

237 

75 

142 64 

LD BC, (16526) 

Se tutti i puntini sono stati 

57 




87 



LD D,A 

mangiati aumenta il pun- 

78 




120 



LD A,B 

teggio del tempo rimasto 

FE 

00 



254 

0 


CP 0 


28 

08 



40 


8 

JR Z + 8 


CD 

FI 

40 


205 

241 

64 

CALL 16625 


15 



21 


DEC 

D 

250 



20 

FA 



32 

JR NZ - 6 


10 

F8 



16 

248 


DJNZ - 8 


CD 

FI 

40 


205 

241 

64 

CALL 16625 


OD 




13 



DEC C 


20 

FA 



32 

250 


JR NZ - 6 


2A 

86 

40 


42 

134 

64 

LD HL, (16518) 

La variabile L di ritorno 

7E 




126 



LD A, (HL) 

assume il valore del codi- 

FE 

25 



254 

37 


CP 37 

ce del livello gioco 

20 

08 



32 

8 


JR NZ + 8 

(1=29,2=30 ecc.). 

3E 

1C 



62 

28 


LD A, 28 


77 




119 



LD (HL),A 

Se si è raggiunto il nono 

21 

91 

41 


33 

145 

65 

LD HL, 16785 

livello si ricomincia dal 

36 

40 



54 

64 


LD (HL), 64 

primo. 

4F 




79 



LD C,A 


06 

00 



6 

0 


LD B,0 


C9 




201 



RET 


32 

96 

40 


50 

150 

64 

LD (16634), A 

Se non è l’ultimo puntino 

20 

34 



32 

52 


JR NZ + 52 

passa al decremento tem- 
po 

FE 

00 



254 

0 


CP 0 

Viene controllato se la 

20 

2C 



32 

44 


JR NZ + 44 

posizione scelta dalla di- 

36 

17 



54 

23 


LD (HL), 23 

rezione è uno spazio vuo- 

E5 




229 



PUSH HL 

to: in questo caso muove 

2A 

94 

40 


42 

148 

64 

LD HL, (16532) 

Gizzy senza allungarlo 

36 

00 



54 

0 


LD (HL); 0 


2A 

00 

78 


42 

0 

120 

LD HL, (30720) 


22 

94 

40 


34 

148 

64 

LD (16532), HL 


36 

15 



54 

21 


LD (HL),21 


21 

02 

78 


33 

2 

120 

LD HL, 30722 


11 

00 

78 


17 

0 

120 

LD DE, 30720 


ED 

4B 

97 

40 

237 

75 

151 64 

LD BC, (16535) 


ED 

BO 



237 

176 


LDIR 


2A 

92 

40- 


42 

146 

64 

LD HL, (16530) 


36 

34 



54 

52 


LD (HL), 52 


EB 




235 



EX DE, HL 


2B 




43 



DEC HL 


72 




114 



LD (HL). D 
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16980 

2B 



43 



DEC HL 


16981 

73 



115 



LD (HL), E 


16982 

E1 


A(; 

225 



POP HL 


16983 

22 

92 

40 

34 

146 

64 

LD (16530), HL 


16986 

18 

l . 

FE 

06 


24 

3 


JR + 3 


16988 

80 


254 

128 


CP 128 

Viene controllato se la 

16990 

20 

2F 


32 

47 


JR NZ + 47 

posizione scelta dalla 
mossa è il muro del labi- 



C 

( 






rinto 

16992 

2 A 

88 

40 

42 

136 

64 

LD HL, (16520) 

Diminuisce a video il tem- 

16995 

7E 



126 



LD A, (HL) 

po a disposizione 

16996 

FE 

1C 


254 

28 


CP 28 


16998 

20 

05 


32 

5 


JR NZ + 5 


17000 

36 

25 


54 

37 


LD (HL), 37 


17002 

2B 



43 



DEC HL 


17003 

18 

F6 


24 

246 


JR - 10 


17005 

3D 



61 



DEC A 


17006 

77 



119 



LD (HL),A 


17007 

2A 

8E 

40 

42 

142 

64 

LD HL, (16526) 

Decrementa il contatore 

17010 

2B 



43 



DEC HL 

del TIME e controlla se il 

17011 

22 

8E 

40 

34 

142 

64 

LD (16526), HL 

tempo è scaduto 

17014 

A7 



167 



AND A 


17015 

01 

01 

00 

1 

1 

0 

LD BC,1 


17018 

ED 

42 


237 

66 


SBC HL,BC 


17020 

D2 

90 

41 

210 

144 

65 

JP NC 16784 


17023 

2A 

90 

40 

42 

144 

64 

LD HL, (16528) 

Stampa a video 

17026 

01 

00 

00 

1 

12 

0 

LD BC,12 

TEMPO SCADUTO 

17029 

09 



9 



ADD HL,BC 


17030 

11 

E4 

40 

17 

228 

64 

LD DE, 16612 


17033 

EB 



235 



EX DE,HL 


17034 

03 



3 



INC BC 


17035 

ED 

B0 


237 

176 


LDIR 


17037 

18 

13 


24 

19 


JR + 19 


17039 

E5 



229 



PUSH HL 


17040 

EB 



235 



EX DE,HL 


17041 

01 

FE 

77 

1 

254 

119 

LD BC, 30718 


17044 

2A 

97 

40 

42 

151 

64 

LD HL, (16535) 


17047 

09 



9 



ADD HL,BC 


17048 

4E 



78 



LD C, (HL) 


17049 

23 



35 



INC HL 


17050 

46 



70 



LD B, (HL) 


17051 

E1 



225 



POP HL 


17052 

A7 



167 



AND A 


17053 

ED 

42 


237 

66 


SBC HL,BC 


17055 

28 

BF 


40 

191 


JR Z - 65 


17057 

EB 



235 



EX DE,HL 

In caso di scontro . o di 

17058 

3E 

05 


62 

5 


LD A, 5 

tempo scaduto fa lampeg- 

17060 

2A 

92 

40 

42 

146 

64 

LD HL, (16530) 

giare la testa di Gizzy 

17063 

CD 

CB 

40 

205 

203 

64 

CALL 16587 


17066 

3D 



61 


DEC 



17067 

2C 

FA 


32 

250 

A 

JR NZ - 6 


17069 

2A 

8A 

40 

42 

138 

64 

LD HL, (16522) 

Controlla se è stato fatto 

17072 

ED 

4B 

8C 40 

237 

' 75 

140 64 

LD BC, (16524) 

il nuovo RECORD 
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17076 

A7 




167 




AND A 


17077 

ED 

42 



237 

66 



SBC HL.BC 


17079 

30 

1F 



48 

31 



JR NC - 31 


17081 

ED 

43 

8A 

40 

237 

67 

138 

64 

LD (16522), HL 


17085 

01 

10 

00 


1 

16 

0 


LD BC.16 

Se è stato fatto il nuovo 

17088 

2A 

88 

40 


42 

136 

64 


LD HL, (16520) 

Record, stampa a video 

17091 

09 




9 




ADD HL,BC 

“NUOVO RECORD” e 

17092 

0E 

OC 



14 

12 



LD C,12 

trasferisce lo SCORE nel 

17094 

11 

D8 

40 


17 

216 

64 


LD DE, 16600 

RECORD 

17097 

EB 




235 




EX DE.HL 


17098 

ED 

BO 



237 

176 



LDIR 


17100 

01 

05 

00 


1 

5 

0 


LD BC,5 


17103 

2A 

82 

64 


42 

130 

64 


LD HL, (16514) 


17106 

ED 

5B 

84 

64 

237 

91 

132 

64 

LD DE, (16516) 


17110 

ED 

B8 



237 

184 



LDDR 


17112 

3E 

1E 



62 

30 



LD A, 30 

Ciclo ritardo al quale fa 

17114 

10 

FE 



16 

254 



DJNZ - 2 

seguito l’azzeramento dei 

17116 

OD 




13 




DEC C 

registri BC per il ritorno 

17117 

20 

FB 



32 

251 



JR NZ - 5 

della variabile L (BASIC) 

17119 

C9 




201 




RET 

e 0 (zero) 
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1984 

N. B.: alla voce "autore/trad." figura, nel caso di articoli tradotti, solo ilnome del traduttore. Dove appare, la voce “versione ’ indica la compatibilità 
con le varie versioni dei computer Sinclair di uno o più listati presenti nell'articolo in questione. Dove non sia indicata esplicitamente la compatibilità 
con lo ZX81, viene sottintesa quella con lo Spectrum. Non viene specificata l’eventuale compatibilità di programmi per Spectrum con lo ZX81. 


OPEN 

Un'occhiata al QL 

Sinclair Shopping I 

Sinclair Shopping II 

Cosa cambia con i Microdrive? 

Lo Spectrum, il QL e gli altri 

SMAU: macchine per ufficio o personal computer? 

Spectrum e interfaccia 1 : un sistema completo 

NEW 

Arriva lo ZX Spectrum! 

IF...THEN 

Programmazione strutturata 
La mente di Algernon 
Piccolo galateo informatico 
Decido, quindi sono.. .un computer 
Logo e tartarughe I 
Logo e. tartarughe II 

REMrHW 

Le interruzioni, teoria e pratica sullo ZX Spectrum I 

Nei meandri dello Spectrum 

Le interruzioni, teoria e pratica sullo ZX Spectrum II 

L'interfaccia come e perché 

Come realizzare una interfaccia I 

Come realizzare una interfaccia II 

RANDOMIZE 
Le soluzioni di Atic Atac 

LOAD 

Attacco missilistico 

Ippodromo 

Bill il muratore 

Bowling 

Ok Corrai 

Inferno 

Plot 

King kona 
Chomp chomp 
Attacco nucleare 
Bioritmi 

I cristalli di Zaphod 

II castello dei dragoni 
Il divoratore pazzo 
Campo di battaglia 
Modulo lunare 
Combat 
Flowchart 

Cubo 2D 

Animazione * 

Sottomarino 

Picnic ' 


Marcello Spero 

i 


Lucio Bragagnolo 

2 


Lucio Bragagnolo 

3 


Marcello Spero 

4 


Marcello Spero 

5 


Lucio Bragagnolo 

5 


Marcello Spero 

6 


Lucio Bragagnolo 

5 


Marcello Spero 

1 


Marcello Spero 

2 

16K/48K 

Carlo Panzalis 

3 


Lucio Bragagnolo 

4 

16K/48K 

Marcello Spero 

5 


Marcello Spero 

6 

16K/48K 

Marcello Spero 

1 


Marcello Spero 

2 


Marcello Spero 

3 

16K/48K 

Marcello Spero 

4 


Marcello Spero 

5 


Marcello Spero 

6 


Carlo Panzalis 

5 


Ivan Ceré 

1 

1 6K/48K 

Ivan Ceré 

1 

16K/48K 

Ivan Ceré 

1 

16K/48K 

Ivan Ceré 

1 

16K/48K 

Ivan Ceré 

1 

16K/48K 

Ivan Ceré 

1 

16K/48K 

Carlo Panzalis 

1 

1 6K/48K 

Marcello Spero 

1 

16K/48K 

Marcello Spero 

1 

16K/48K 

Paolo Manei 

2 

48K 

Lucio Bragagnolo 

2 

16/48K 

Angelo Motta 

2 

ZX81 16K 

Angelo Motta 

2 

ZX81 16K 

Marcello Spero 

2 

48K 

Marcello Spero 

2 

16K/48K 

Marcello Spero 

2 

1.6K/48K 

Paolo Agnelli 

2 

16K/48K 

Paolo Agnelli 

2 

16K/48K 

Paolo Mambretti 

2 

16K/48K 

Paolo Mambretti 

2 

48K 

Paolo Maffei 

2 

Ì6K/48K 

Paolo Maffei 

2 

16K/48K 



Display file e attributi 

Carlo Panzalis 

3 

16K/48K 

Corso di chitarra 

Paolo Maffei 

3 

48K 

Microassembler 

Carlo Panzalis 

. 3 

48K 

La diga 

Carlo Panzalis 

3 

1 6K/48K 

Tre topi 

Carlo Panzalis 

3 

16K/48K 

Anellide 

Marco Possa 

3 

16K/48K 

Forzaquattro 

Giovanni Tisi 

3 

ZX81 16K 

Goldrace 

Giovanni Tisi 

3 

ZX81 16K 

Trappola mortale 

Paolo Maffei 

3 

1 6K/48K 

Supercar 

Massimo Modelli 

3 

16K/48K 

Archivio 

Enrico Levantino 

4 

16K/48K 

Slot machine 

Carlo e Mauro Corti 

4 

1 6K/48K 

Soluzione dei triangoli 

Francesco Santi 

4 

16K/48K 

Warlock 

Paolo Maffei 

4 

48K 

La valle della morte 

Angelo Motta 

4 

ZX81 16K 

Corsa nel tunnel 

Marcello Spero 

4 

16K/48K 

Disassembler Z80 

Massimo Magnani 

4 

16K/48K 

Formula 1 1 

'Angelo Motta 

4 

ZX81 16K 

Soccorso aereo 

Paolo Maffei 

4 

16K/48K 

Poker 

Alberto Chiericati 

4 

48K 

UDG: ovvero l’Utilizzo Dettagliato (dei caratteri) Grafici 1 

Carlo Panzalis 


16K/48K 

Formula ì II 

Angelo Motta 

5 

ZX81 16K 

ZX8 1 : disegno in prospettiva 

Pietro Maria Malusardi 

5 

ZX8I 16K 

Caratteri grafici & linguaggio macchina 

Carlo Panzalis 

5 

1 6K/48K 

Generatore di caratteri 

Fabio Scandura 

5 

] 6K/48K 

UDG: ovvero l’Utilizzo Dettagliato (dei caratteri) Grafici II 

Carlo Panzalis 

5 

16K/48K 

Gizzy 1 

Angelo Motta 

6 

ZX81 16K 

Pallonzolo 

Daniele Malavasi 

6 

48K 

Scroll control 

Emilio Roncori 

6 

48K 

Data base hashing 

Antonio Motta 

6 

48K 

Sindisc 01 

Daniele Malavasi 

6 

48K 

Flatman 

Angelo Motta 

Raffaele Nardo 

6 

ZX81 16K 

La chiave magica 

6 

1 6K/48K 

RUN 

Stonkers 

Lucio Bragagnolo 

1 

48K 

Alchemist 

Lucio Bragagnolo 

1 

48K 

Pedro 

Lucio Bragagnolo 

2 

48K 

Cosmic Cruiser 

Lucio Bragagnolo 

2 

48K 

Jumping Jack 

Lucio Bragagnolo 

3 

•16/48K 

Road Racer 

Lucio Bragagnolo 

3 

1 6/48K 

Tower of Evil 

Lucio Bragagnolo 

4 

48K 

Volcanic Planet 

Lucio Bragagnolo 

4 

16/48K 

Zoom 

Lucio Bragagnolo 

5 

48K 

Ah Diddums 

Lucio Bragagnolo 

5 

16/48K 

Gold Rush 

Lucio Bragagnolo 

6 

16/48K 

Blockade Runner 

Lucio Bragagnolo 

6 

16/48K 

River Rescue 

Lucio Bragagnolo 

6 

48K 

PRINT 

Programmazione dello ZX Spectrum 

Lucio Bragagnolo 

1 


Easy Programming for The ZX Spectrum 

Lucio Bragagnolo 

1 


The ZX Spectrum and How To Get The Most from It 

Lucio Bragagnolo 

2 


The Spectrum Book of Games 

Lucio Bragagnolo 

2 


Imparate il BASIC ccon lo Spectrum/lmparate il BASIC con lo ZX81 

Lucio Bragagnolo 

3 


Sinclair ZX Spectrum-assembler e linguaggio macchina per principianti 

Lucio Bragagnolo 

3 


Spectrum Tool Programmi di utilità, grafica e gioco 

Lucio Bragagnolo 

4 


Il libro del Microdrive Spectrum 

Lucio Bragagnolo 

4 


Create giochi arcade col vostro Spectrum 

Lucio Bragagnolo 

5 


La gestione delle informazioni con lo ZX Spectrum 

Lucio Bragagnolo 

5 


Dizionario del BASIC - enciclopedia del linguaggio BASIC 

Lucio Bragagnolo 

6 


15 giochi grafici per ZX Spectrum 

Lucio Bragagnolo 

6 


ZX CLUB 

Caratteri in corsivo sullo Spectrum 

Luigi Rizzo 

2 

16K/48K 

Istruzioni DRAW per ZX81 

Giorgio Guerrini 

2 

ZX81 16K 

Programma per la stampa di etichette autoadesive 

Subroutine ai gestione input con scelta del cursore 

Roberto Chimenti 

Roberto Pareschi 

3 

4 

48K 
ZXfil 16K 

Calendario 

Carlos M.G. Weinstein 

4 

1 6K/48K 

Frasi colte 

Andrea De Maria e 

5 

16K/48K 

Emilio Triunfo 

6 


Un computer che, si riDIMensiona 

Giuseppe Ricciardi 

4 

16K/48K 

VARIE 

Il labirinto di “Anellide" 


4 

16K/48K 




( 


Ecco come ti abboni, 
risparmi, vinci. 


VINO 100 COMMODORE 64 


Abbonatevi subito: tra tutti coloro che si abboneranno a una o più riviste Jackson 
tra il 15/9/84 e il 28/2/85 saranno estratti a sorte mensilmente 20 Commodore 64. 



Per sottoscrivere abbonamenti potrete utilizzare il modulo di cc/p inserito in questo fascicolo o inviare un assegno allegato al tagliando sottostante. 


Gruppo Editoriale Jackson S.r.l. - Via Rossellini, 12 - 20124 Milano, allegando assegno o fotocopia della ricevuta di 
versamento con vaglia postale intestato a GRUPPO EDITORIALE JACKSON - MILANO. 

□ Si, desidero sottoscrivere un abbonamento a: 

□ Videogiochi 111 n.) L 30.000 anziché L 38.500 

□ Home Computer (11 n.) L 31.500 anziché L 38.500 

□ Personal Software (11 n.) L 34.000 anziché L 44.000 

□ Bit (1 1 n.) L 43.000 anziché L 55.000 

□ Informatica Oggi (1 1 n.) L 31.000 anziché L 38.500 

□ PC Magazine (10 n.) L 40.000 anziché L 50.000 

□ Personal O (10 n.) L 35.000 anziché L 40.000 

□ Compuscuola (9 n.) L 15.000 anziché L 18.000 

□ Telecomunicazioni Oggi (10 n.) L 28.000 anziché L 35.000 

□ Automazione Oggi (11 n.) L 30.500 anziché L 38.500 

□ Elettronica Oggi (11 n.) L 36.000 anziché L 44.000 

□ L’Elettronica (22 n.) L 44.000 

□ Elektor (12 n.) L 29.000 anziché L 36.000 

□ Strumenti Musicali (10 n.) L 24.000 anziché L 30.000 
Attenzione per abbonamento all'estero le tariffe devono essere 
aumentate del 50% 

E c’è un super-risparmio a chi si abbona a due o più riviste. 

Tutti coloro che sottoscrivono l'abbonamento a due o più riviste godono di un prezzo ulteriormente agevolato, come appare nella seguente tabellina. 

Esempio: Bit+lnformatica Oggi L 43.000+31.000=74.000 meno L 2.000=L 72.000 

Abbonamento 

a 8 riviste: L 20.000 in meno sulla somma degli 8 prezzi d’abbonamento 

a 2 riyiste L 2.000 in meno sulla somma dei 2 prezzi d’abbonamento 

a 9 riviste L 25.000 in meno sulla somma dei 9 prezzi d’abbonaménto 

a 3 riviste L 4.000 in meno sulla somma dei 3 prezzi d’abbonamento 

a 10 riviste L 30.000 in meno sulla somma dei 10 prezzi d'abbonamento 

a 4 riviste L 7.000 in meno sulla somma dei 4 prezzi d’abbonamento 

a 1 1 riviste L 35.000 in meno sulla somma degli 1 1 prezzi d’abbonamento 

a 5 riviste L 10.000 in meno sulla somma dei 5 prezzi d’abbonamento 

a 12 riviste L 40.000 in meno sulla somma dei 12 prezzi d’abbonamento 

a 6 riviste L 13.000 in meno sulla somma dei 6 prezzi d’abbonamento 

a 13 riviste L 44.500 in meno sulla somma dei 13 prezzi d’abbonamento 

a 7 riviste L 16.000 in meno sulla somma dei 7 prezzi d’abbonamento 

a 14 riviste L 50.000 in meno sulla somma dei 14 prezzi d’abbonamento 



□ Allego assegno n° della Banca 
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L O A D 



di Daniele Malavasi 


S e siete dei coraggiosi e vi piace la 
“vita spericolata”, ecco qui un game 
per le vostre esigenze: dovete liberare da 
una terribile e misteriosa prigione una 
bellissima ragazza, Andre, rapita da mo- 
striciattoli blu, i Brandoloidi, che ora vi 
sfidano a liberarla. I soggetti in gioco sono 
numerosi e molto caratteristici, ma per 
vostra sfortuna quasi tutti nemici o co- 
munque di poco aiuto ai fini della vostra 
vittoria. A voi il compito di far piazza 
pulita di mostri, ragni, chiavi di accesso 
ed altri ostacoli, attraverso l’uso paziente 
ed esperto dei sei tasti da azionare a due 
mani. 

Strumento indispensabile per far girare il 
programma, che occupa più di 20 Kbyte 
(contiene anche una parte in codice mac- 
china), è uno Spectrum 48K. 


Strategia di gioco 

All’inizio, dopo la presentazione grafi- 
co-sonora di rito, un evidente messaggio 
vi permette di scegliere se giocare subi- 
to (tasto 1) o se vedere le istruzioni (ta- 
sto 2), che sono molto efficaci e ben 
curate. Come abbiamo già accennato, 
scopo del gioco è quello di liberare una 
bellissima ragazza di nome Andre, che 
è stata rapita e segregata in una prigio- 
ne da un numerosissimo quanto micidia- 
le gruppo di Brandoloidi, mostriciattoli 
blu, bassi e cicciottelli, i quali vi sfidano 
a liberare il loro prezioso ostaggio, met- 
tendo a costante prova il vostro spirito 
d’iniziativa e d’avventura tramite una 
serie di difficoltà e sorprese che, se non 
superate, implicheranno la vostra irre- 
parabile sconfitta. E’ infatti necessario 
eliminare almeno venti di questi Bran- 
doloidi, dopodiché sarà anche necessa- 
rio raccogliere tre chiavi dello stesso ti- 
po e nello stesso ordine di quelle mo- 
stratevi con criteri assolutamente ca- 
suali ed imprevedibili da una mappa 
che compare in alto a destra sul video 
e che viene aggiornata di partita in par- 
tita. 

Potete a vostra discrezione scegliere se 
eliminare prima tutti i Brandoloidi e poi 
procurarvi le chiavi o viceversa, ma le 
condizioni di gioco, molto variabili nel 


tempo e comunque sempre piuttosto 
impegnative, vi indurranno senz’altro 
ad agire di impulso, senza riuscire a 
crearvi un metodo di gioco definitiva- 
mente valido; tuttavia, con un po’ di 
esperienza potrete verificare come an- 
che tanta casualità sia soggetta ad indi- 
spensabili regole: ad esempio, non po- 
trete mai trovare più di due chiavi con- 
temporaneamente sullo stesso scher- 
mo. Per eliminare i Brandoloidi e per 
procurarsi le chiavi di accesso alla pri- 
gione è necessario manovrare con cal- 
ma e pazienza sei terribili ragnetti neri, 
che si trovano in altrettante celle; trami- 
te i tasti A, S, D, K, L ed ENTER potete 
farli scendere fino a toccare i bersagli 
(Brandoloidi, chiavi ed altro) posti sul 
terreno. D’obbligo, naturalmente, l’uso 
contemporaneo di due mani, cosicché 
si è pensato di scegliere tasti comodi da 
controllare. 


Le complicazioni sono rappresentate 
dal fatto che i ragnetti possono calarsi 
dal soffitto della relativa cella, anche 
senza il vostro consenso, andando a 
morsicare la bella Andre (cosa che do- 
vete assolutamente evitare, pena la 
perdita della sfida). 

Inoltre può succedere che sul terreno 
di una cella compaia uno dei venti zuc- 
cherini che avete a disposizione all’ini- 
zio e che vi servono come alimento 
energetico per muovervi: anche in que- 
sto caso i ragni scenderanno cercando 
di rubarvi detti zuccherini, e quando 
non ne avrete più non potrete neanche 
procedere, perdendo cosi la sfida e la- 
sciando Andre prigioniera dei Brando- 
Ioidi. La discesa dei ragni che si calano 
spontaneamente va frenata tramite gli 
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stessi sei tasti già visti, in modo da far 
tornare detti ragni immediatamente sul 
soffitto della cella. Attenti: non è detto 
che i ragni ubbidiscano immediatamen- 
te ai vostri ordini, motivo per cui, se 
volete farvi capire e rispettare cercate 
di insistere sui tasti con decisione e pa- 
zienza. 

Durante il gioco tre monitor segnaleran- 
no, rispettivamente: zuccherini persi, 
Brandoloidi eliminati e chiavi procurate 
(che da bianche diventeranno verdi). 
Inoltre una serie di messaggi scorrevoli 
vi informerà della situazione del gioco. 
Alla fine di ogni partita, volendo, è pos- 
sibile rivedere le istruzioni. La sfida può 
essere vinta o persa. Non ci sono quindi 
da raggiungere o superare punteggi e/o 
records, e la bella Andre non potrà es- 
sere liberata finché non riuscirete a rea- 
lizzare tutte le richieste formulate all’ini- 
zio. 

Battitura e salvataggio 

E’ necessario disporre di due cassette, 
sulla prima delle quali innanzitutto sal- 
verete il sottoprogramma di lancio (li- 
stato 1) mediante l’istruzione SAVE 
“ANDRE” LINE 1. 

La verifica dell’esatto caricamento sarà 
fatta col solito VERIFY”” 

Prendete ora la seconda cassetta, sulla 
quale dovrà essere salvato, tramite 
l’istruzione SAVE “LISTATO 2”, tutto 
il listato 2, battuto ovviamente alla per- 
fezione; in tal modo rimarrà sempre di- 
sponibile in caso di errori o modifiche. 
Una volta verificata l’esatta corrispon- 
denza del secondo sottoprogramma al 
listato 2, date RUN: dopo circa 20 se- 
condi di schermo bianco un beep e il 
messaggio 0 OK, 1190:3, contraddistin- 
to da caratteri diversi dallo standard 
solitamente usato dallo Spectrum, con- 
fermeranno che è avvenuta la memoriz- 
zazione di tutti i nuovi caratteri grafici 
(che saranno ovviamente esatti se, e so- 
lo se, tutti i DATA delle linee 1010 - 
1026 sono stati da voi battuti alla perfe- 
zione). 

A questo punto, ammesso che tutto 
proceda per il meglio, potete salvare 
sulla prima cassetta (dopo circa tre o 
quattro secondi dalla fine del sottopro- 
gramma di lancio) il generatore di carat- 
teri in oggetto, tramite SA VE “CARAT- 
TERI” CODE 43000, 1024, e cioè tra- 
sformando il programma BASIC da voi 
battuto in una sequenza di numeri-byte 
in codice macchina. Questa procedura 
ridurrà il listato BASIC dagli oltre 7 
Kbyte a circa 1 Kbyte, ed il relativo 
tempo di carica da 42 a meno di dieci 
secondi. Attenti ad eseguire poi la veri- 
fica tramite VERIFY””CODE, visto che 
questo secondo FILE è stato appena 
trasformato in una sequenza di byte. 
Ciò fatto potete accantonare la seconda 
delle due cassette e tenere solo la pri- 
ma, sulla quale salvare, subito dopo il 
secondo sottoprogramma in codice 
macchina appena visto, il terzo blocco, 
che è il MASTER (e cioè il gioco vero 
e proprio), il cui listato n° 3 di riferimen- 
to richiederà un tempo di battitura più 


Descrizione del program 
Linee Commento 


Listato 1 (sottoprogramma di lancio) 

10 Inizio del sottoprogramma; dati preliminari; preparazio- 
ne video. 

11 Dati ed istruzioni per i successivi caricamenti. 


Listato 2 (generatore di caratteri) 


990-1000 

1001 

1010-1026 

1099-1111 

1190 


Inizio del sottoprogramma; dati iniziali. 

Trasferimento dalla ROM all’indirizzo 43.000 della RAM 
del data-set dei caratteri. 

Data-set dei nuovi caratteri grafici relativi al game “An- 
dre”. 

Linee di memorizzazione del data-set all’indirizzo 43.000 
della RAM. 

Spostamento del puntatore dei caratteri dall’indirizzo 
15.360 (ROM) all’indirizzo 43.000 (RAM) e verifica della 
memorizzazione.. 


Listato 3 (master) 


1 

481 

601 

900 

1010 

1110 

1210 

1310 

1410 

1440 

1470 

1510 

1680 

1701 

1810 

2010 

3010 

3111 

5009 

5030 

5101 

5121 

5410 

5501 

5601 

6005 

7010 

7601 

7710 

7815 

7910 

8010 

8113 


480 Inizio del sottoprogramma; dati iniziali; predisposizione 
video. 

499 Preparazione grafica del video. 

799 Routine di reset grafico del video. 

930 Scelta condizionata casuale della posizione dei soggetti 
di gioco selezionati. 

1099 Routine principale di gestione. 

1129 Subroutine di stampa di Andre. 

1229 Subroutine di stampa dei Brandoloidi. 

1329 Subroutine di stampa degli zuccherini. 

1429 Subroutine di stampa della chiave piccola. 

1459 Subroutine di stampa della chiave media. 

1489 Subroutine di stampa della chiave grande. 

1599 Verifica della situazione generale. 

1699 Fine partita causata dal morso di un ragno ad Andre. 
1799 Subroutine di predisposizione di nuove partite. 

1899 Subroutine di stampa dei messaggi scorrevoli predeter- 
minati. 

2099 Subroutine di reset delle variabili. 

3099 Verifica delle posizioni dei ragni. 

3199 Subroutine di selezione condizionata casuale dei soggetti 
di gioco. 

5019 Subroutine di conteggio degli zuccherini persi. 

5099 Fine partita causata dalla perdita di tutti gli zuccherini. 
5199 Subroutine di conteggio dei Brandoloidi eliminati. 

5199 Monitoraggio della eliminazione di venti Brandoloidi. 
5499 Istruzioni di gioco. 

5599 Primo data-set grafico. 

5635 Stringhe di frasaggio per le istruzioni. 

6099 Data-set di predisposizione video. 

7099 Memorizzazione delle variabili stringa. 

7603 Subroutine di stampa delle chiavi scelte. 

7799 Controllo e comparazione con la mappa data del tipo e 
della classifica della chiave raccolta. 

7899 Scelta casuale della classifica delle chiavi. 

7999 Fine partita causato dalla liberazione di Andre. 

8099 Memorizzazione dei caratteri grafici definiti nel sottopro- 
gramma. 

8183 Linee di monitor. 


lungo (si tratta di circa 26 videate). Il 
salvataggio del MASTER andrà esegui- 
to tramite l’istruzione SAVE “MA- 
STER” LINE 1, in modo da ottenere 
alla fine una sequenza di FILE perfetta- 
mente corrispondente si dovrebbe dire 
allo schema sottoriportato. 


«r 2 5 
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Andre 

versione per ZX Spectrum 48K 

Listato 1 

10 PAPER 0: BORDER 0: CLS : 

PRINT #1 ; AT 0,0; INK 1 ; " 

{ G 5 } { 30G3 } {SG5} {Gl } { 30G3 } 

{ G2 } " ; AT 0,12; INK 6;" ANDR 
E " ; AT 1,5; INK 7;" ® 1984 
by DI SCOVOGUE " 

11 FOR n=l TO 3: BEEP .1,20: 

BEEP .1,23: BEEP .1,37: 

NEXT n: PAUSE 30: LO AD "" 
CODE : LO AD "" 

Andre 

versione per ZX Spectrum 48K 

Listato 2 

990 REM { 22G3 } 

991 REM ANDRE 

992 REM LISTATO 2 

993 REM © 1984 by DISCOVOGUE 

994 REM { 22SG3 } 

1000 POKE 23562,1 

1001 FOR n=l 5360 TO 16383: LET k 
=PEEK n: POKE n+27640,k: 

NEXT n 

1010 DATA 16,16,16,16,48,0,48,0, 

16.16.32.0. 0.0.0.0.0.0.0.0, 

16.16.32.0. 0.0.0.0.0.0.48.0 

1011 DATA 254,134,138,146,162,19 

4.254.0. 48.16.16.16.16.16.1 

6. 0. 2 54. 2. 2. 254. 128. 128. 254 
,0,254, 2, 2, 254, 2, 2, 2 54, 0,1 3 
0,130, 130, 2 54, 2, 2, 2, 0,254,1 

28. 1 28, 2 54, 2, 2, 254, 0,2 54, 1 2 
8,128,254,130,130,254,0 

1012 DATA 254,2,2,2,4,8,16,0,254 
,1 30, 1 30, 254, 1 30, 1 30,254,0, 

254.1 30,1 30,254,2,2,254,0 

1013 DATA 254,130,130,254,130,13 
0, 1 30,0, 252,1 32,1 32,254,1 30 
,130, 254, 0,2 54, 128, 128, 128, 
1 28, 1 28, 2 54, 0,240,1 36,1 32,1 

30. 1 30,1 30,2 54,0,2 54,1 28,1 2 

8.254.1 28.1 28.254.0. 254.1 28 
,1 28,254,1 28,1 28,1 28,0 

1014 DATA 254,128,128,158,130,13 
0,254, 0,1 30, 130, 130, 2 54, 130 
,130,130,0,16,16,16,16,16,1 

6.16.0. 1 4. 4. 4.1 32.1 32.1 32.2 

52.0. 1 30.1 32.136.240.1 36.1 3 

2. 130. 0. 1 28, 128, 128, 1 28, 1 28 
,128, 254, 0,2 54, 146, 146, 146, 
1 30,1 30,1 30,0,242,1 46,1 46,1 



46.1 46.1 46.1 58.0 

1015 DATA 254,130,130,130,130,13 
0, 254,0, 254, 1 30, 1 30, 254,1 28 
,1 28,1 28,0,254, 1 30, 1 30,1 46, 

1 38.1 34.254.0. 254.1 30.1 30.2 

54. 144. 144. 158. 0. 254. 128. 12 

8. 2 54. 2. 2. 254. 0. 254. 16. 16.1 

6.16.16.16.0 

1016 DATA 130,130,130,130,130,13 
0,254,0,130,130,68,68,40,40 
,1 6,0, 1 30, 1 30,1 30,1 46,1 46,1 

46.254.0. 130.68.40.16.40.68 
,130,0, 130, 130, 1 30, 2 54, 16,1 

6. 1 6, 0,2 54, 2, 4, 56, 64, 1 28, 25 
4,0 

1017 DATA 7,24,32,64,128,224,152 
,1 40, 1 28,96,24,6,1 ,1 ,3,5,1 3 
0,1 29,1 28,96,1 6,1 4,1 ,0,9,1 7 

7.65.67.70.88.224.0. 1 .1.1.3 
,3,7,1 5,1 5,31 ,31 ,63,63,1 27, 

. 127,127,255,128,128,128,192 

,192,224,240,240,248,248,25 

2.252.254.254.254.255 

1018 DATA 64,96,80,80,80,72,72,4 
0, 2,6,1 0, 1 0,20,20,36,36,37, 

38. 36. 34. 89. 84. 1 56, 1 56, 72, 2 
00, 36, 66, 178, 41, 57, 57, 0,0, 2 
3, 40, 67, 140, 148, 224, 128, 129 
,1 34,8,1 36,64,32,28 

1019 DATA 1,129,96,16,0,3,4,4,0, 
0,1 84, 68, 2, 226, 82, 1 2, 2, 4, 52 
,76, 1 32, 1 28, 1 29, 1 26, 8, 208,1 
74,1 69,1 61 ,1 61 ,1 61 ,30 

1020 DATA. 255,127,127,127,63,63, 

31 .31 .1 5.1 5.7. 3. 3.1 .1 .1 .255 
,254,254,254,252,252,248,24 

8.240. 240.224.1 92.1 92.1 28.1 
28,128 

1021 DATA 8,12,12,12,13,10,16,18 
,1 6, 48, 48, 80, 96, 1 60, 1 6, 1 44, 
1 6, 1 1 3, 1 30, 1 20, 9, 26, 50, 30, 4 

8. 12. 130. 60. 32. 1 52, 136, 240 

1022 DATA 255,240,255,16,255,227 
,255,1 34,255,63,255,1 27,11 , 
255,255,1 27,254, 1 30,1 30,30, 

16.0. 48.0 
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1023 DATA 0,1,7,1,3,1,1,1,0,128, 
224,128,192,128,128,128,3,7 
,1 2, 24, 24, 24, 1 5, 0,1 92, 22 4, 4 

8.24.24.24.240.0 

1024 DATA 0,3,3,3,3,3,3,3,0,128, 
128, 224, 248, 248, 128, 1 28, 3, 3 
,15, 60, 112, 60, 7,0, 128, 128, 2 

24.120.28.120.192.0 

1025 DATA 0,1,7,7,1,1,1,1,0,128, 
1 28, 224, 128, 128, 224, 128, 1 ,3 
,6, 6, 4, 7, 3, 0,1 28,1 92,96,96, 

32.224.1 92.0 

1026 DATA 14,8,8,14,8,8,14,0,151 
,21 0,21 0,1 78, 1 78, 1 46, 1 46,0, 
1 1 8,69,69,1 1 8,70,69,1 1 7,0 

1099 RESTORE 1010: FOR n=43264 

TO 43271: READ k: POKE n,k 
: NEXT n 

1100 FOR n=4331 2 TO 43319: 

READ k: POKE n , k : NEXT n 

1101 FOR n=43352 TO 43359: 

READ k: POKE n , k : NEXT n 

1102 FOR n=43368 TO 43375: 

READ k: POKE n ,k : NEXT n 

1103 FOR n=43384 TO 43463: 

READ k: POKE n,k: NEXT n 

1104 FOR n=43520 TO 43727: 

READ k: POKE n,k: NEXT n 

1105 FOR n=43776 TO 43983: 

READ k: POKE n , k : NEXT n 

1106 FOR n=43488 TO 43511: 

READ k: POKE n,k: NEXT n 

1107 FOR n=43280 TO 43311: 

READ k: POKE n , k : NEXT n 

1108 FOR n=43728 TO 43759: 

READ k: POKE n ,k : NEXT n 

1109 FOR n=43984 TO 44015: 

READ k: POKE n , k : NEXT n 

1110 FOR n=43336 TO 43343: 

READ k: POKE n , k : NEXT n 

1111 FOR n=43760 TO 43775: 

READ k: POKE n ,k : NEXT n 
1190 POKE 23606,248: POKE 23607, 
1 67: BEEP 1 ,30 

Andre 

versione per ZX Spectrum 48K 

Listato 3 

1 RANDOMIZE : POKE 23658,255: 

GO TO 10 

2 POKE 23606,0: POKE 23607,60 
: RETURN 

3 POKE 23606,248: POKE 23607, 
167: RETURN 


10 PAPER 6: BORDER 0: CLS : 

POKE 23562,1: GO SUB 7000: 
GO SUB 6000 

11 REM { 22G3 } 

1 2 REM ANDRE 

13 REM LISTATO 3 

14 REM © 1984 by DISCOVOGUE 

15 REM { 22SG3 } 

90 LET z=4 : PAPER 2: GO SUB 3: 
PRINT AT 1,8; INK 7;f$: 

FOR n=l TO 4: PRINT AT 1,0 
; OVER 1; INK z ; e$ : FOR j=l 
TO 4: BEEP .02,50: NEXT j: 
LET z=l 1 -z: NEXT n 
100 GO SUB 8000: PRINT AT l,0;e 
$ : PAPER 6 

480 GO SUB 2000 

481 GO SUB 5500: FOR n=0 TO 2: 

PRINT AT n , 0 ; OVER 1; 

PAPER 4; INK 0; FLASH 1; 
BRIGHT 1 ; h$ : NEXT n 
485 PAPER 2: FOR n=0 TO 2: 

PRINT AT n , 8 ; INK 0;g$: 
NEXT n 

491 PRINT AT 1,10; INK 7; "ab"; 
AT 2,1 0; "cd" ;AT 0,10; INK 5 
; " 20" ; AT 1,13; INK 7;"00" 

492 PRINT AT 1,17; INK 7;"wx"; 
AT 2,1 7;"yz";AT 0,17; INK 5 
; " 2 0 " ; AT 1,20; INK 7; "00" 

493 PRINT AT 0,25; INK 5;"CHIAV 
I" 

494 GO SUB 7800 

495 GO SUB 5400: GO SUB 500 
499 GO TO 900 

601 PAPER 6: INK 7: FOR n=l 
TO 6: LET x=a(l,n): 

PRINT AT 4,x-l ;"s{2SG8}u"; 
AT 20,x-l ; " f { 2SG8 } h" ; AT 5,x 
-l;"t v";AT 19,x-l;"e g": 

BEEP . 1 ,x*l .3: NEXT n 
610 INK 0: FOR n=l TO 6: LET x= 
a ( 1 , n) : PRINT AT 5,x;"BC"; 
AT 18,x-l ; "f =>h" ; AT 19,x;"= 
>": BEEP . 1 ,x* 0 . 1 : NEXT n 
799 INK 0: RETURN 
900 LET n=l +INT (RND*6) : 

GO SUB 1100 

920 FOR f=l TO 5 

921 LET n=1 +INT (RND*6) 

922 IF a ( 3 , n) >0 THEN GO TO 921 

923 GO SUB 3100: NEXT f 
930 LET vit=0 
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1010 LET O=C0DE INKEY$ 

1025 IF 0> 1 2 AND 0<84 THEN 
GO SUB 81 00+O 
1030 GO SUB 3000 
1099 GO TO 1001 
1110 LET ca=a (1 r n) 

1115 INK 4: FOR v=l TO 15 STEP 2 
: PRINT AT v/2+9 ,ca ;a$ (v 
TO v+1 ) : NEXT v 

1125 LET a ( 3 , n) =9 : LET a(5,n)=17 

1 1 26 LET a (4,n) =1 
1129 INK 0: RETURN 
1 21 0 LET cb=a (1 ,n) 

1215 INK 1: PRINT AT 1 4 , cb ; " i j " ; 
AT 15, cb ; " kl" ; AT 16,cb-l;"m 
nop" ; AT 17,cb;"qr" 

1220 LET qbr=qbr+l 
1 225 LET a ( 3 , n) =1 3 : LET a(5,n)=l 
7 

1 226 LET a ( 4 , n) =2 
1229 INK 0: RETURN 

1 31 0 LET cz=a(l ,n) 

1311 LET r z = 9+INT (RND* 5) 

1315 IF r z<l 5 THEN FOR h=18 

TO rz + 4 STEP -1 : PRINT 
AT h-1 ,cz-l ; INK 0 ; "f = >h" ; 
AT h , c z - 1 ; " => BEEP .1,- 
2: NEXT h 

1319 INK 7: PRINT AT rz+1 ,cz;"ab 
" ;AT r z+2 , cz ; "cd" 

1320 LET qzu=qzu+l 

1 325 LET a ( 3 ,n) =r z : LET a(5,n)=r 
z+2 

1 326 LET a ( 4 , n) =3 
1329 INK 0: RETURN 
141 0 LET c4=a (1 ,n) 

1415 INK 3: PRINT AT 16,c4;"{|"; 
AT 17,c4;" }~" 

1 425 LET a (3,n) =1 5: LET a(5,n)=l 
7 

1426 LET a ( 4 , n) =4 
1429 INK 0: RETURN 
1 440 LET c5=a (1 ,n) 

1445 INK 3: PRINT AT 16,c5;"#$"; 
AT 17,c5;" %&" 

1 455 LET a ( 3 , n) =1 5 : LET a(5,n)=l 

7 

1456 LET a ( 4 , n) =5 
1459 INK 0: RETURN 
1 470 LET c6=a (1 ,n) 

1475 INK 3: PRINT AT 16,c6;"[\"; 
AT 1 7 ,c6; " ] t" 

1485 LET a (3,n) =1 5: LET a(5,n)=l 
7 



1486 LET a ( 4 , n) =6 

1489 INK 0: RETURN 

1510 IF a (4,w) =2 OR a(4,w)>3 

THEN LET tr=w: GO TO 3020 

1512 IF a ( 2 , w) >a ( 3 , w) AND a(4,w) 
=1 THEN GO TO 1600 

1513 IF a ( 2 , w) <=a ( 3 , w) THEN 

FOR n=a ( 2 , w) TO 5 STEP -1 : 
PRINT AT n ,a ( 1 ,w) ; " " : 

NEXT n: PRINT AT 5,a(l,w); 
" BC" : LET a (2 ,w) =5 
1599 RETURN 
1680 BEEP 2,-10 
1685 LET 1$=" 

COME HAI POTUT 

0 PERMETTERE CHE UN RAGNO M 
ORSICASSE LA BELLA ANDRE ? 

RICOMINCIA TUTTO DACCAPO ! 

1 i 

n 

1689 DATA 1,32,33,62,63,94,95,12 
6,1 27,1 30 

1690 RESTORE 1689: FOR d=l TO 5: 

READ i: READ f: GO SUB 180 
0: NEXT d 
1699 GO TO 1700 
1701 GO SUB 2000 

1720 FOR n=4 TO 20: PRINT AT n , 0 
;e$ 

1721 IF vit=0 THEN BEEP .1,-10- 
n*0 . 9 

1722 IF vit=l THEN BEEP .05,n*2 
: BEEP ,02,n*3-2 

1723 NEXT n 

1730 GO SUB 5000: GO SUB 5100 

1731 GO SUB 7800 

1740 GO SUB 5400: GO SUB 500 

1799 GO TO 900 

1810 FOR e=i TO f: PRINT AT 3,0; 

INK 7; PAPER 0; BRIGHT 1;1 
$ (e TO e + 31 ) : BEEP .01,-10 

1811 IF e=f THEN RETURN 
1820 PAUSE 2.7: NEXT e 
1899 RETURN 

2010 LET zu=20 : LET br=20: LET q 
zu=0: LET qbr=0: LET chi=0 
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2011 DIM a ( 5 , 6 ) : DIM b(2,3): 

DIM c ( 2 , 1 0 ) : DIM d ( 3 , 8 ) 

2012 LET vo=0 : LET sog=0 

2015 DATA 2,7,12,18,23,28,25,27, 
29, 2, 7, 7, 2, 12, 7, 18, 12, 23, 18 
,28,23,23,28,18,23,12,18,7, 
12,0,2,15,2,0,14,4,2,15,6,4 
,14, 30, 28, 15, 28, 30, 14, 26, 28 
,1 5,24,26,1 4 

2016 RESTORE 2015: FOR n=l TO 6: 

READ x: LET a(l,n)=x: 

LET a ( 2 , n) =5: NEXT n 

2017 FOR n=l TO 3: READ x: LET b 
(1 ,n) =x: NEXT n 

2018 FOR n=l TO 10: READ x: 

READ u: LET c(l,n)=x: 

LET c (2 ,n) =u: NEXT n 

2019 FOR n=l TO 8: READ x: 

READ u: READ y: LET d(l,n) 
=x : LET d ( 2 , n) =u : LET d(3,n 
) =y : NEXT n 

2099 RETURN 

3010 LET tr = 1 +INT ( RND* 6 ) 

3015 IF a(4,tr)=l OR a(4,tr)=3 

THEN GO TO 3017 

3016 GO TO 3010 

3020 LET a (2, tr) =a (2,tr) +1 

3021 LET trc=a (1 , tr ) : LET trr=a( 
2, tr) 

3022 IF trr<=a (3 , tr) THEN 

PRINT AT trr , tre ; " BC" ; AT t 
rr-1 , tre; "AD": BEEP .02, tre 
: RETURN 

3050 FOR i=0 TO 5: FOR n=a(3,tr) 
+ 1 TO a (5,tr) : PRINT AT n,t 
rc-1 ; INK i; OVER 1;" ": 

BEEP .01 ,n+a (3, tr) : NEXT n 


: NEXT i 

3051 FOR n=a ( 3 , tr ) +1 TO a(5,tr): 
PRINT AT n , trc-1 " : 
NEXT n 

3073 FOR n=a ( 3 , tr ) TO 5 STEP -1 : 
PRINT AT n , tre ; " " : 

NEXT n: PRINT AT 5, tre;" BC 

II 

3076 IF a ( 5 , tr ) < > 1 7 THEN 

FOR t=a (5, tr) +1 TO 17: 
PRINT AT t, trc-1 ; " " ; 

AT t+1 , trc-1 ; "f=>h" : BEEP . 

1 , -t*2 : NEXT t 

3080 IF a (4, tr ) =3 THEN LET zu=z 
u-1 : LET qzu = qzu- 1 : 

GO SUB 5000: IF zu=0 
THEN GO TO 5020 

3081 IF a ( 4 , tr ) =2 THEN LET br=b 
r-1 : LET qbr =qbr- 1 : 

GO SUB 5100: IF br=0 
THEN GO SUB 5120 

3082 IF a ( 4 , tr ) = 1 THEN GO TO 16 
00 

3083 IF a ( 4 , tr ) >3 THEN LET chi= 
chi- 1 : GO SUB 7700 

3090 LET a (2,tr) =5: LET a(3,tr)= 
0 

3099 LET n=tr : GO SUB 3100: 
RETURN 

3111 LET so = 2 + INT (RND* 5) 

3112 IF chi>l OR vo> = 2 THEN 

LET so=2+INT (RND* 2) 

3126 IF br < 1 THEN LET so=3 

3127 IF qzu>2 OR qbr>2 THEN 

LET so= 4 + INT (RND* 3 ) 

3130 IF br>0 AND qbr=0 THEN 
LET SO=2 

3140 IF so<4 THEN GO SUB 1000+s 
0*1 00 

3141 IF so>=4 OR SO=0 THEN 

LET chi=chi+l : GO SUB 1400 
+ (so-4) *30 

3199 LET sog=so: RETURN 

5009 INK 7: PAPER 2 

5010 LET z$ = STR$ zu 

5011 PRINT AT 1 , 1 3 ; " 00" 

5012 PRINT AT 1,12+LEN z$;20-zu 
5019 PAPER 6: INK 0: RETURN 
5030 FOR n=0 TO -5 STEP -1: 

BEEP . 0 3 , n : BEEP ,12,n*10: 
NEXT n: PAUSE 10 
5035 LET 1$=" 

PECCATO ! ! ! T 
I SEI FATTO MANGIARE TROPPI 
ZUCCHERINI E NON HAI PIU' 
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5036 

5037 


5099 
5101 
51 09 
51 1 0 
51 1 1 
51 1 2 
51 1 9 
51 21 
51 30 


51 35 


51 36 
51 37 

51 99 
541 0 


5420 


5422 


5423 

5424 


5425 

5430 

5436 


5437 


LA FORZA PER PROSEGUIRE: AN 
DRE RIMANE PRIGIONIERA. 

Il 

DATA 1 ,32,33,62,63,94,95,12 
6,127,151 

RESTORE 5036: FOR d=l TO 5: 

READ i: READ f: GO SUB 180 
0 : NEXT d 
GO TO 1 700 

IF br<0 THEN RETURN 
INK 7: PAPER 2 
LET b$ =STR$ br 
PRINT AT 1 ,20; "00" 

PRINT AT 1,19+LEN b$;20-br 
PAPER 6: INK 0: RETURN 
IF vo>=2 THEN GO TO 7900 
FOR n=l TO 4: BEEP .09,0: 
BEEP . 09 , n* 1 0 : NEXT n: 
PAUSE 1 0 
LET 1$=" 

SEI RIUSCITO A 
D ELIMINARE VENTI BRANDOLOI 
DI, MA NON HAI ANCORA TUTTE 
LE CHIAVI RICHIESTE. ,, 

DATA 1,32,33,62,63,94,95,12 

2 

RESTORE 5136: FOR d=l TO 4: 

READ i: READ f: GO SUB 180 
0: NEXT d 
RETURN 

BRIGHT 1: PAPER 0: LET i=4: 

FOR n=4 TO 20: PRINT AT n, 
0 ; e$ : BEEP .01,n: NEXT n 

PRINT AT 9, 1 ; "1 P 

ER GIOCARE SUBITO" ; AT 12,1; 

"2 PER VEDERE LE ISTRUZ 

IONI" 

LET j =CODE INKEY$ : IF j=49 
THEN PRINT AT 9,0;e$;AT 1 
2 , 0 ; e$ : BEEP .1,50: GO TO 5 
490 

IF j = 50 THEN GO TO 5430 
LET i = 1 1 — i : PRINT AT 9,0; 
INK i; OVER l;e$;AT 12,0; 
INK 1 1 - i ; e$ 

BEEP .1,55: GO TO 5422 
BRIGHT 0: PRINT AT 9,0;e$; 
AT 1 2 , 0 ; e$ : BEEP .1,50 
DATA 6, 5, 5, 5, 5, 4, 4, 4, 4, 7, 7, 
7, 7, 5, 5, 5, 5, 5, 5, 7, 7, 7, 7, 0,4 
,3, 7, 4, 4, 4, 4, 6, 6, 6, 7 
RESTORE 5436: FOR q=5601 
TO 5603: READ u: GO SUB q: 
PRINT AT q-5597 , 1 6-LEN (i$ 
)/2; INK u ; i$ : BEEP .1,20: 



NEXT q 

5438 FOR q= 0 TO 30 STEP 2: 

PRINT AT 7 ,q; INK 1 ; 

BRIGHT 1 ;"wx"; AT 8 ,q; "yz" ; 
AT 9,q;"wx";AT 10,q;"yz" : 

BEEP .01 , q* 1 . 5 : NEXT q 

5440 FOR q=5604 TO 5613: 

GO SUB q: READ u: PRINT 
AT q-5593 ,1 6-LEN (i$)/2; 

INK u ; i$ : BEEP .1,20: 

NEXT q: LET r=9 

5441 FOR n=0 TO 30 STEP 2: LET r 

=1 6-r : PRINT AT r,n; OVER 1 
; INK 7; BRIGHT 1;" " ; AT r 

+ 1 , n ; " " 

5442 PRINT AT 16-r,n-2; OVER 1; 

INK 1; BRIGHT 1;" " ; AT 17 

- r , n - 2 ; " " ; AT r,30;" "; 

AT r+1 ,30; " " : LET k= 

CODE INKEY$ 

5443 IF k< >0 THEN GO TO 5445 

5444 BEEP .001,60: NEXT n: LET r 
= 1 6-r : GO TO 5441 

5445 PRINT AT r,n; OVER 1; INK 1 

; BRIGHT 1;" " ; AT r+l,n;" 

II 

5446 FOR n=5 TO 20: PRINT AT n,0 
; e$ : BEEP . 01 ,n: NEXT n 

5450 FOR n=l TO 6: PRINT AT 18, a 
(1 ,n) ; INK 3;"AD";AT 19,a(l 
, n) ; "AD" ; AT 20 , a ( 1 , n) ; " BC" : 

BEEP .1 ,30-a (1 ,n) : NEXT n 

5451 FOR q= 56 1 4 TO 5626: 

GO SUB q: READ u: PRINT 
AT q-5609,1 6-LEN (i$)/2; 

INK u ; i$ : BEEP .1,20: 

NEXT q 

5455 FOR n=l TO 1 0 

5457 LET xa=c(l,n): LET xb=c(2,n 
): PRINT AT 17, xa; INK 6; 

OVER 1; BRIGHT 1;" "; 

AT 1 8 ,xa ; INK 7;" " ; AT 19 

, xa ; " " ; AT 20, xa;" "; 

AT 17, xb; INK 3; BRIGHT 0;" 

" ; AT 1 8 , xb; " " ; AT 19,x 

b;" " ; AT 20, xb;" ": 

BEEP .05,xa 


SUPERSINC® 1/85 83 


5458 LET k=CODE INKEY$: IF k 
<>0 THEN GO TO 5460 

5459 NEXT n: GO TO 5455 

5460 PRINT AT 17,xa; OVER 1; 

INK 3; BRIGHT 0;" " ;AT 1 

8,xa;" " ; AT 19,xa;" 

AT 20 , xa ; " " 

5461 FOR n=5 TO 20: PRINT AT n,0 
; e$ : BEEP .01,n: NEXT n 

5467 FOR q=5627 TO 5634: 

GO SUB q: READ u: PRINT 
AT q- 56 22 , 1 6-LEN (i$)/2; 

INK u ; i$ : BEEP .1 ,20: 

NEXT q 

5468 FOR n=l TO 4: LET rar=d(3,n 
) : LET rbr =d ( 3 , 9-n) : 

PRINT AT rar,d(l,n); INK 7 
;"ab";AT rar+1 , d ( 1 ,n) ; "cd" ; 
AT rbr , d ( 1 , n+4 ) ; "ab" ; AT rbr 
+1 ,d(l ,n+4) ;"cd": BEEP .l,n 
1 2 : NEXT n 

5469 GO SUB 5635: READ u: 

PRINT AT 15,9; INK u;i$: 
LET i = 2 

5470 LET k=CODE INKEY$ : IF k 
<>0 THEN GO TO 5489 

5480 LET i=9- i : PRINT AT 15,9; 
INK i; BRIGHT 1 ; i$ 

5488 BEEP .01,i*4: PAUSE 1: 

PAUSE 4: GO TO 5470 

5489 PRINT AT 15,9; INK 0;i$ 

5490 BRIGHT 0: PAPER 6: FOR n=4 

TO 20: PRINT AT n,0; 

PAPER 6 ; e$ : BEEP .01,20-n: 

NEXT n 
5499 RETURN 

5501 INK 0 

5505 DATA 1 , 1 , 1 , 2 , 1 , 3 , 1 , 4 , 1 , 5 , 1 , 
6,1 ,7,1 ,8, 2, 9, 3, 9, 4, 9, 5, 8, 5 
,7, 5, 6, 5, 5, 5, 4, 5, 3, 5, 2, 5,1 , 

2. 5. 3. 5. 4. 5. 7.1 ,7, 2, 7, 3, 7, 4 
,7, 5, 7, 6, 7, 7, 7, 8, 7, 9, 8, 7, 8, 

6.9.5.10.4.10.3.11 .1 .11 .2.1 
1 ,3,11 ,4,11 ,5,11 ,6,11 ,7,11 , 
8,11,9 

5506 DATA 13,1,13,2,13,3,13,4,13 
,5,13,6,13,7,13,8,13,9,14,9 
,15,8,16,7,17,6,17,5,17,4,1 
7,3,17,2,16,1,15,1,14,1,19, 
1 ,19,2,19,3,19,4,19,5,19,6, 
19, 7, 19, 8, 19, 9, 20, 9, 21, 9, 22 
,9,23,8,23,7,23,6,22,5,21,5 
,20,5,21 ,4,22,3,23,2,23,1 

5507 DATA 29,9,28,9,27,9,26,9,25 
,9,25,8,25,7,25,6,25,5,26,5 


,27,5,28,5,29,5,25,4,25,3,2 

5,2,25,1 ,26,1 ,27,1 ,28,1 ,29, 
1 

5510 LET tx=l : LET ty=153 

5511 RESTORE 5505: FOR n=l TO 10 
8: READ xi: READ yi: PLOT t 
x+xi*2 , ty+yi*2 : DRAW 1,0: 

DRAW 0,1: DRAW -1,0: 

BEEP .004 ,xi*yi/4 . 2 : 

NEXT n 

5512 PAUSE 1: PAUSE 20 

5599 INK 0: RETURN 

5601 LET i$=" LE ISTRUZIONI:": 

RETURN 

5602 LET i$="UN NUMEROSO GRUPPO" 
: RETURN 

5603 LET Ì$="DI BRANDOLOIDI " : 

RETURN 

5604 LET i$="HA RAPITO LA BELLA 
ANDRE" : RETURN 

5605 LET i $ = " E TI SFIDA A LIBERA 
RLA" : RETURN 

5606 LET i$=" PER RIUSCIRCI, DOVR 
AI ELIMINARNE": RETURN 

5607 LET i$=" ALMENO UNA VENTINA 
ED INOLTRE TI": RETURN 

5608 LET i$="DOVRAI PROCURARE LE 

TRE CHIAVI": RETURN 

5609 LET Ì$="DI ACCESSO ALLA PRI 
GIONE" : RETURN 

5610 LET i$="QUESTE CHIAVI VANNO 

RACCOLTE" : RETURN 

5611 LET i$= "RI SPETTANDO L'ORDIN 
E FORNITO" : RETURN 

5612 LET Ì$="DA UNA APPOSITA MAP 
PA, CHE": RETURN 

5613 LET i$="COMPARE ALL'INIZIO 
DEL GIOCO": RETURN 

5614 LET i $ = " LA PRIGIONE HA SEI 
CELLE, E IN": RETURN 

5615 LET i$= "OGNUNA DI QUESTE C' 
E' UN RAGNO": RETURN 

5616 LET i$="MIC IDI ALE CHE PUÒ' 
ESSERE DA": RETURN 

5617 LET i $ = " TE MANOVRATO IN MO 
DO DA" : RETURN 

5618 LET i$=" ELIMINARE I BRANDOL 
OIDI O PER": RETURN 

5619 LET i $ = " RACCOGLI ERE LE CHI 
AVI": RETURN 

5620 LET i$=" ATTENTO CHE ALLO S 
TESSO TEMPO": RETURN 

5621 LET i$="DEVI ANCHE IMPEDIRE 

CHE LA BELLA": RETURN 

5622 LET i $= " ANDRE VENGA MORSICA 
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TA, CASO IN": RETURN 

5623 LET i$="CUI PERDERESTI LA S 
FIDA !!": RETURN 

5624 LET i$="": RETURN 

5625 LET i$="PER CONTROLLARE I R 
AGNI USA:": RETURN 

5626 LET i$=" A S D K 

L *_£" : RETURN 

5627 LET i$="ULTIMA COSA IMPORT 
ANTE : " : RETURN 

5628 LET Ì$="CERCA DI IMPEDIRE A 
I RAGNI": RETURN 

5629 LET i$="DI MANGIARE GLI ZUC 
CHERINI CHE": RETURN 

5630 LET i $ = " TI SONO INDI SPENSAB 
ILI PER AVERE": RETURN 

5631 LET i $ = " LA FORZA DI COMBATT 
ERE" : RETURN 

5632 LET i$="SE NE PERDI VENTI A 
LLORA NON" : RETURN 

5633 LET Ì$="SARAI PIU' IN GRADO 

DI": RETURN 

5634 LET i$=" PROSEGUIRE E PERDER 
AI LA SFIDA" : RETURN 

5635 LET i$=" BUONA FORTUNA ! " : 

RETURN 

6005 GO SUB 2 

6010 PRINT AT 3,0; PAPER 0;e$; 

AT 21 , 0 ; e$ : FOR n = 0 TO 2: 
PRINT AT n , 0 ; PAPER 2;e$: 
NEXT n 

6020 PRINT # 1 ; AT 0,0; PAPER 0; 

INK 1 ; d $ ; AT 0,13; INK 6;"A 
NDRE" ; AT 1,5; INK 7;" ® 198 
4 by DI SCOVOGUE " 

6099 RETURN 

7010 LET a$=" EMFNGOHPIQJRKSLT " 

7011 LET b$=" AD" : LET c$=" BC" 

7012 LET d$="I^5} { 1 1 G3} 

{ 1 2 G 3 } { SG5 } { Gl }{30G3}{G2}" 

701 3 LET e$=" 

II 

7014 LET f $="FERMA IL NASTRO" 

7015 LET g$=" {SG8 } {SG5 } 

{G5 }{ SG5 } { G 5 } {SG8}" 

7016 LET h$=" " 

7099 RETURN 

7601 PRINT AT l,b(l,n); INK 7; 

PAPER 2 ; " { | " ; AT 2,b(l,n);" 
}~": RETURN 

7602 PRINT AT l,b(l,n); INK 7; 

PAPER 2;"#$" ;AT 2 , b ( 1 , n) ; " 
%&": RETURN 

7603 PRINT AT l,b(l,n); INK 7; 

PAPER 2;"[\";AT 2,b(l,n);" 


' ] t" : RETURN 

7710 IF a (4, tr) <>b(2,vo+l ) 

THEN RETURN 

7720 PRINT AT l,b(l,vo+l); 

OVER 1; PAPER 2; INK 4;" 

" ; AT 2 , b ( 1 , vo+1 ) ; " " 

7760 IF vo< 2 THEN LET vo=vo + l : 

RETURN 

7761 IF br < = 0 THEN GO TO 7900 

7769 FOR n=l TO 4: BEEP .09,0: 

BEEP . 09 , n*l 0 : NEXT n: 
PAUSE 1 0 

7770 LET 1$=" 

TI SEI PROCURA 
TO TUTTE LE CHIAVI RICHIEST 
E, MA HAI ELIMINATO MENO DI 
VENTI BRANDO LO IDI . 

Il 

7771 DATA 1,32,33,62,63,94,95,12 
0 

7772 RESTORE 7771: FOR d=l TO 4: 

READ i: READ f: GO SUB 180 
0: NEXT d 
7799 RETURN 

7815 FOR n=l TO 3: LET ch=l+ 

INT ( RND * 3 ) : LET b(2,n)=ch+ 
3 

7820 GO SUB 7600+ch: NEXT n 
7899 RETURN 

7910 FOR n=l TO 4: BEEP .09,0: 
BEEP . 09 , n* 1 0 : NEXT n: 
PAUSE 1 0 

7920 LET 1$=" 

COMPLIMENTI, S 
EI STATO BRAVISSIMO ! ! ! AD 
ESSO PUOI LIBERARE LA BELLA 
ANDRE E CONSIDERARE VINTA 
LA SFIDA. APPUNTAMENTO ALL 
A PROSSIMA AVVENTURA ! ! ! 

II 

7921 DATA 1,32,33,62,63,94,95,12 
6,127,158,159,179 

7922 RESTORE 7921: FOR d=l TO 6: 

READ i: READ f: GO SUB 180 
0 : NEXT d 

7999 LET vit=l : GO TO 1700 

8010 DATA 1,0,0,1,1,0,0,0,0,0,29 
,35, 67, 77, 1 6, 1 6, 1 28, 24, 1 64, 
196, 208, 172, 4, 0,0, 0,1 28, 0,0 
,128,0,1 28 

8011 DATA 3,4,8,9,10,18,18,34,17 
,10,60,32,64,72,84,99,96,80 
,80,40,40,40,40,40,40,80,80 
,80, 80, 80, 47, 41, 41, 57, 41, 9, 
9, 9, 9, 9 
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A causa di un inconveniente tecnico, 
l’articolo “Pallonzolo” è andato in stam- 
pa privo di una tabella di riferimento, 
menzionata a pag. 37, contenente i valo- 
ri della funzione IN su cui lavorare in 
caso di cattivo funzionamento del gio- 
co. 

La riportiamo di seguito scusandoci del- 
l’inconveniente con tutti i lettori. 




8012 DATA 9, 9, 9, 9, 5, 5, 5, 5, 5, 5, 5, 
5,5,5,5,5,5,5,5,9,10,20,8,0 
,64, 160, 144, 136, 136,68,36,3 
6, 21 0,73, 49, 1 3, 2, 1 22, 1 38, 10 
,10,18,26,42,42,18,10,9 

8013 DATA 5,5,5,5,5,5,245,137,13 
,14,18,16,16,16,16,16,16,16 
,16,16,144,144,144,144,144, 
1 44, 1 44,1 60,160,1 60,1 60,1 60 
,160, 160, 160, 144, 80, 48, 16,0 


8020 

8099 

RESTORE 8010: FOR n=65368 
TO 65527: READ k: POKE n 
: NEXT n 

RETURN 

81 1 3 
81 64 

LET w=6: 
RETURN 

GO 

SUB 

1 500 

81 65 
81 67 

LET w=l : 
RETURN 

GO 

SUB 

1 500 

81 68 
81 74 

LET w= 3 : 
RETURN 

GO 

SUB 

1 500 

81 75 

LET w=4 : 
RETURN 

GO 

SUB 

1 500: 

81 76 
81 82 

LET w=5: 
RETURN 

GO 

SUB 

1 500 

81 83 

LET w=2 : 

GO 

SUB 

1 500: 


RETURN 


A tutti i lettori: 

per motivi non dipendenti dalla nostra 
volontà la rivista ha accumulato un 
certo ritardo del quale ci scusiamo. 
Confermiamo il nostro impegno per 
garantire, in tempi brevi, la puntualità di 
pubblicazione 
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a cura di Lucio Bragagnolo 


Zip-Zap 

L , (h)allucinante viaggio di un 
robot colonizzatore in mezzo a 
miriadi di alieni 


M olto raramente ci siamo trovati di 
fronte ad un gioco contraddistinto 
da un tale senso di surrealismo e astrazio- 
ne. Volendo, certo, è possibile fare riferi- 
mento a esso come al “solito” arcade ga- 
me, ma significherebbe sicuramente pec- 
care di superficialità, sottovalutando ciò 
che realmente vi viene offerto in termini 
di giocabilità, specie per quanto concerne 
l’“atmosfera” generale di ZIP-ZAP. 

Il tema è supersfruttato, appartenente al 
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filone “pianeta-alieno-alieni-cattivi”, ma 
come già detto (e come vedremo poco a 
poco) viene trattato in maniera decisa- 
mente originale. 

Il pianeta su cui si ambienta la vicenda è 
Hallucinor, appartenente allo Spectralia 
Star System e scoperto solo recentemen- 
te. A fare da protagonista questa volta è 
un robot della serie Prelim-0484, discre- 
tamente armato e dotato di particolarissi- 
me possibilità di movimento. Innanzitutto 
non è possibile fermarlo, ma solamente 
limitare la sua velocità; in secondo luogo 
possiede solo due controlli direzionali, 
predisposti per consentirgli di ruotare in 
senso orario o antiorario, a scelta. Se ne 
deduce che l’unica maniera possibile di 
tenere “fermo” il nostro robot (che - sta- 
vamo dimenticandocene! - è addetto al- 
l’eliminazione dal pianeta di ogni forma 
di vita ostile, allo scopo di favorire la suc- 
cessiva colonizzazione umana) consiste 
nel farlo, letteralmente, girare in tondo 
fino a quando vorrete che si diriga in una 
data direzione (e in questo caso basterà 
abbandonare il comando di rotazione al 
momento giusto). 

Sia pure armato di un provvidenziale can- 
noncino, Prelim-0484 molto difficilmente 
sarà in grado di tenere testa agli alieni 
per molto tempo. Infatti, lentamente, ma 
inesorabilmente, la sua riserva di energia 
decresce, specialmente quando i suoi 


movimenti non riescono a evitare la colli- 
sione con uno o più alieni. In questo caso 
l’attivazione del campo di forza appro- 
priato lo priverà di 10 unità di energia, 
sulle 99 a sua disposizione all’inizio della 
sua avventura. E’ ovvio che l’esaurimen- 
to dell’energia provocherà la fine del no- 
stro eroe... 

Quale, allora, la sua unica possibilità di 
proseguire la missione? Quella di racco- 
gliere, nel più breve tempo possibile, le 
quattro unità energetiche sparse sulla su- 
perficie del pianeta: verrà così attivata la 
rete di teletrasporto, di cui il robot potrà 
usufruire passando esattamente sopra la 
Tele-porta presente nel suo campo visi- 
vo. 

Naturalmente, il teletrasportarsi non ri- 
solverà i problemi di Prelim-0484, anzi: 
vedrete che ogni volta gli alieni da fron- 
teggiare saranno sempre più intelligenti 
e combattivi, mettendo a dura prova 
l’abilità del robot (e, cosa che ci interessa 
più da vicino, l’abilità di chi dovrà pilotar- 
lo). 

A questo punto vi starete già chiedendo: 
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u e l’originalità, l’atmosfera, quel certo 
non so che di cui si parlava prima...?” 
Calma, ci arriviamo subito. Le particolari- 
tà di cui sopra sono date specialmente 
dalla grafica del gioco, semplice, ma 
estremamente efficace. In più, ^atmo- 
sfera” è data dal particolare movimento 
di tutti gli oggetti presenti sullo schermo. 
La Tele-porta e le unità energetiche, tra- 
pezoidi trasparenti di differenti dimensio- 
ni, rimangono immobili, fluttuando nello 
spazio: improvvisamente dall’alto dello 
schermo scende un cilindro ruotante, il 
quale si ritira verso l’alto dopo avere de- 
positato in campo il robot. Subito dopo 
appaiono anche gli alieni, ugualmente 
fluttuanti e con una sadica inclinazione a 
concentrarsi nelle zone più importanti per 
Prelim. 
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L’unica tattica consigliabile è quella di 
impadronirsi perfettamente, attraverso la 
pratica, del movimento del robot, per poi 
tentare di superare i vari livelli nel più 
breve tempo possibile. La soglia critica è 
quella delle 10 unità di energia, che sono 
poi anche il bonus che vi viene corrispo- 
sto per ogni teletrasporto effettuato. 
Sullo schermo non c’è praticamente nien- 
te altro: ma ciò che vedrete sarà sufficien- 
te a suffragare le nostre affermazioni. A 
questo punto dobbiamo però . lasciarvi: 
sentiamo il tema musicale di “Guerre stel- 
lari” che ci invita a giocare per l’ennesima 
volta a ZIP-ZAP (che, fate attenzione, gi- 
ra solo sugli Spectrum 48K ed è compati- 
bile con i joystick Kempston, Fuller e 
AGF)... 



Molar Matti 

Se la placca dentaria è per voi nn 
nemico arartele... 

State tranquilli: non intendiamo fare la 
pubblicità di un dentifricio, bensì parlar- 
vi di un simpaticissimo gioco, MOLAR 
MAUL, che potrebbe essere quasi defi- 
nito educativo, per il suo contenuto, ol- 
tre che divertente. In più, nel panorama 
generale della produzione di software 
per lo Spectrum, sempre più portata 
alla penalizzazione dei possessori dei 
16K, questo programma costituisce una 
felice eccezione, in quanto giocabile an- 
che sulle versioni inespanse del popola- 
re ZX. Il tema è “odontoiatrico”: la dife- 
sa di una sana dentatura dagli assalti di 
sciami di temibilissimi batteri DK (Den- 
torium Kamikazium), che infestano il ca- 
vo orale ed esultano alla sola vista di 
caramelle, lecca-lecca e golosità simila- 
ri. 




Con l’aiuto dei dolciumi i DK assalteran- 
no con furia crescente la dentatura pre- 
sente sullo schermo, fino a distruggerla 
completamente. L’unica possibilità a 
nostra disposizione è l’uso di uno spaz- 
zolino da debiti, abbinato al dentifricio 
Imagico, un ritrovato portentoso, capa- 
ce di arrestare al solo contatto l’avanza- 
re della placca o addirittura, per mezzo 
di vigorose strofinate, ridurla. Fate però 
attenzione: senza dentifricio lo spazzoli- 


critici, riportandoli a livelli di sicurezza, 
perché durante l’assalto dei batteri non 
ve ne rimarrà il tempo; cercate per 
quanto potete di non trascurare nessun 
dente, perché una dentatura cariata, 
ma completa rende molto di più di una 
sana, ma ridotta; infine, badate di non 
restare mai senza dentifricio, in quanto 
il subire un assalto DK rimanendo privi 
di difese ha effetti devastanti e, a volte, 
letali. 

Per la cronaca, lo strofinamento consu- 
ma dosi massicce di Imagico: tenetelo 
presente... 

La giocabilità è ottima anche con la ta- 
stiera (per i joystick, come sempre, è 
possibile utilizzare Kempston, Fuller, 
AGF) e il movimento dello spazzolino è 
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no risulta assolutamente inutile e la di- 
sponibilità di Imagico è limitata. Ne con- 
segue che l’abilità del giocatore non 
consisterà solo nel correre frenetica- 
mente da un dente all’altro, ma anche 
e soprattutto in una saggia gestione del- 
le sue scorte. 

I danni allo smalto vengono visualizzati 
per mezzo di colori (un dente nero è 
perso per sempre), oltre che da un indi- 
catore del livello di carie raggiunto. Lo 
scopo del gioco è resistere il più a lungo 
possibile, affrontando ondate di batteri 
sempre più numerose e agguerrite. 
Qualche consiglio tattico: impratichitevi 
subito dell’arte di muovere corretta- 
mente lo spazzolino, in quanto premola- 
ri e molari sono raggiungibili in un unico 
modo; approfittate delle pause (indicate 
dall’apparizione di un dolce, diverso per 
ogni livello) per strofinare i denti più 


perfetto. 

La grafica è semplice, ma gradevolissi- 
ma, con una grande bocca che si apre 
alla richiesta “Open wide, please” e mo- 
stra la dentatura oggetto della batta- 
glia, la cui colorazione progressiva dà 
alla schermata un aspetto multicolore 
che fa il suo effetto. MOLAR MAUL è 
adatto sia per gli adulti che per i bambi- 
ni e può considerarsi davvero un gioco 
riuscito. Per i genitori può essere l’occa- 
sione, sfruttando la tematica del gioco, 
di far crescere nei figli il... dente del giu- 
dizio, a proposito di una corretta igiene 
dentale; a questo si aggiunga il diverti- 
mento assicurato, e il tutto è più che 
sufficiente per raccomandarvelo. 

Sabre Wall 

Una eccezionale combinazione 
di avventura e arcade* con una 
grafica tra le migliori mai viste. 

Ricordate “Atic Atac”, il celeberrimo 
gioco della Ultimate, i cui segreti sono 
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stati svelati nel numero 5 di SUPER- 
SINC? 


Orbene, SABRE WULF è il secondo ca- 
polavoro della serie, ispirato alle stesse 
tematiche, ma completamente e impre- 
vedibilmente differente dal suo prede- 
cessore. Per chi non lo conoscesse, lo 
scopo di Atic Atac era quello di far usci- 



re il proprio personaggio (selezionabile 
fra tre differenti) da un tenebroso ca- 
stello, rintracciando i vari pezzi della 
gigantesca chiave del portone. Ora, in- 
vece, il personaggio è unico e l’avventu- 
ra si svolge nel cuore della giungla, in 
un labirintico intrico di sentieri e passag- 
gi segreti. 

Il protagonista è un tipico esploratore, 
completo di casco coloniale e di un ma- 
chete con cui difendere la sua vita - a 





proposito: non c’è più il pollo arrosto di 
Atic, ma è possibile perdere non più di 
un numero variabile di vite - dalle insidie 
della giungla, variopinta e lussurreg- 
giante, dalla grafica sbalorditiva, popo- 
lata da una serie di specie animali e 
non, talmente varia che non cerchere- 
mo nemmeno di elencarla compieta- 
mente, facendo solo qualche nome tra 
gorilla, pappagalli, ragni, scorpioni, ser- 
penti, ippopotami, lucertole e chi più ne 
ha ne metta. 

Gli animali non si comportano tutti nello 
stesso modo: ad esempio i rinoceronti 
caricano continuamente, mentre gli ip- 
popotami sonnecchiano immobili (e, se 
tenete alla vostra pelle, vi conviene non 
disturbarli!) e, per fare un altro esem- 
pio, i gorilla si limitano il più delle volte 
a pararsi davanti a voi. Non tutti gli 
animali possono venire uccisi dall’agi- 
tarsi del vostro machete (realizzato be- 
nissimo...) e ve ne accorgerete a vostre 
spese. Le presenze animate sono com- 
pletate dai rappresentanti di una tribù 
indigena, chissà perché anch’essa desi- 
derosa di mettervi i bastoni tra le ruote. 
A somiglianza di quanto accadeva in 
Atic Atac, l’obbiettivo del vostro aggi- 
rarsi nella giungla è quello di raccoglie- 
re i pezzi di un amuleto, che vi consenti- 
ranno di uscire dall’incubo che vi circon- 
da, in un modo che viene chiaramente 


spiegato" nelle istruzioni (diamine, un 
po’ di curiosità bisogna pure lasciarla, 
no?). Abbiamo fondate ragioni di ritene- 
re che anche questa volta i pezzi del- 
l’amuleto siano disposti “pseudo- 
random”; questo significa che anche 
quando avrete risolto l’avventura - e 
vi accorgerete di quanto sia difficile! - 
ogni partita successiva sarà ugualmente 
difficile e impegnativa (soprattutto con- 
siderando che la mappa di SABRE 



WULF è molto più vasta e complicata 
di quella di Atic Atac). 

Nel gioco non esistono comunque unica- 
mente ostacoli e difficoltà: in vostro aiu- 
to, per riuscire a vincere o, perlomeno, 
a incrementare il punteggio, vengono 
una miriade di premi e possibilità di ogni 
tipo, in numero e varietà (se possibile) 
ancora superiori a quelli delle presenze 
ostili. Facendo anche in questo caso 
qualche esempio, accenniamo a gioielli, 
pozioni, viveri, anelli magici, statuette 
(queste ultime vi fanno guadagnare una 
vita supplementare, e sperimenterete 
ben presto la loro utilità) e altro ancora, 
con una dovizia che a nostro parere fa 
veramente impallidire l’intera “prima 
generazione” di scrittori di giochi dello 
Spectrum. 

I controlli sono gli stessi di Atic, con 
cinque tasti disposti orizzontalmente e 
CAPS SHIFT o SPACE per fermare 
momentaneamente il gioco (e darvi la 
possibilità di riportare convenientemen- 
te sulla vostra mappa la zona in cui vi 
trovate). Per i joystick siamo più o me- 
no alle solite, vista la possibilità dell’uso 
di comandi Kempston, programmabili o 
compatibili con l’interfaccia 2 Sinclair. 
Che altro dire, a questo punto? Dare 
consigli di gioco è superfluo sia per i 
conoscitori di Atic Atac (i quali sanno 
già come devono comportarsi) sia per 


gli inesperti, che impareranno ben pre- 
sto come per questo tipo di avventure 
siano sufficienti requisiti come sangue 
freddo, tanta pazienza, moltissima 
esperienza e una buona dose di intelli- 
genza. A voi tutti, possibili futuri gioca- 
tori di SABRE WULF, consigliamo co- 
munque di fare molta attenzione alle 
strane orchidee multicolori che fiorisco- 
no di tanto in tanto sul vostro cammino 
- importantissime! -, e raccomandiamo 
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Libri firmati JACKSON 



Nicole Bréaud-Pouliquen 
LA PRATICA DELL APPLE 

“Il Sistema APPLE II", il “BASIC Applesoft", 
il disegno e la grafica: arricchiti da esempi e esercizi. 
130 pagine L. 10.000 
Codice 3410 

F. Francescani - F. Paterlini 

Voi e il vostro Commodore 64 

Uno strumento fondamentale per la comprensione e 
programmazione del Commodore 64. Con consigli, 
programmi testati, glossario e utili accenni di BASIC. 

256 pagine L. 22.000 Codice 347D 

Alan Miller 

PROGRAMMI SCIENTIFICI IN PASCAL 

Un'opera base per chi desidera costruirsi una 
“libreria" di programmi in grado di risolvere i più 
frequenti problemi scientifici e ingegneristici. 

372 pagine L. 25.000 
Codice 554P 

Carmine Elefante 
L'home computer TI/99-4A 

Il BASIC, il BASIC Esteso e il microprocessore 
dell’home computer della T.l. Con programmi di 
utilità e svago. 192 pagine L. 15.000 
Codice 343B 

Giacomino Baisim - Giò Federico Baglioni . 

IL FORTH PER VIC 20 E CBM 64 

La programmazione in FORTE! e la sua 
implementazione sul Commodore VIC 20 e CBM 64. 
150 pagine L. 11.000 
Codice 527B 


Franco Filippazzi - Giulio Occhini 

VOI E L’INFORMATICA 

L'opera che il manager moderno non può ignorare. 

In 100 tavole: gli strumenti dell'Informatica, 
l’Informatica e l’Azienda, realtà e prospettive 
tecnologiche... 

116 pagine L. 15.000 
Codice 526A 

Roland Dubois 

CAPIRE I MICROPROCESSORI 

Un fantastico viaggio alla scoperta del “cervello” 
elettronico: la funzione del microprocessore, 
delle memorie ROM e RAM, delle interfacce... 

126 pagine L. 10.000 
Codice 342A 

Gaetano Marano 
77 PROGRAMMI PER SPECTRUM 

Dalla Grafica alla Business Grafica, dalla musica 
alle animazioni, dai giochi all'elettronica... tutte 
le possibilità offerte dal più piccolo dei computer. 

150 pagine a colori L. 16.000 
Codice 555A 

Rita Bonelli-Daria Gianni 
ALLA SCOPERTA DEL VIC 20 

Un testo chiave per imparare a conoscere e usare 
uno dei Personal del momento. 

308 pagine L. 22.000 
Codice 3380 

Cassetta Programmi L. 15.000 
Floppy Programmi L. 25.000 

CO 

3 
•g 
> 
o 


La Biblioteca che fa testo 


In busta chiusa, e senza impegno, inviate questo coupon a: 

Gruppo Editoriale Jackson - Via Rosellini, 12 - 20124 Milano 

□ Desidero ricevere gratuitamente il Catalogo Generale della Biblioteca 
Jackson e informazioni sulle IO Riviste specialistiche da voi pubblicate, 
(allego L. 1 .000 in francobolli per contributo spese di spedizione) 

□ Desidero ricevere contrassegno il/i volume/i 


I (pagherò al ricevimento L 

| più L. 2.000 per contributo spesò di spedizione 


| Nome. 

| Via 

I CAP _ 


. Cognome. 


.Città. 




-j 



caldamente di non rimanere mai più di 
qualche secondo in ogni schermata (il 
perché, anche qui, ve lo lasciamo sco- 
prire da soli). 

Si potrebbe parlare di questo gioco per 
pagine e pagine ancora, ma i consueti 
problemi di spazio ce lo impediscono: 
vi invitiamo così, per il discorso “grafi- 
ca”, a farvi un’idea più precisa di quan- 
to vi abbiamo descritto attraverso le fo- 
tografie che vedete pubblicate. Per il 
resto vi diciamo soltanto che se siete 
amanti dell’avventura intelligente, SA- 
BRE WULF non può, per nessuna ra- 
gione, mancare nella vostra raccolta di 
software. 



I programmi recensiti 
si possono ordinare 
utilizzando il coupon 
pubblicato a pag. 98 
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a cura di Lucio Bragagnolo 

I libri italiani vengono offerti 
con il 10% di sconto sai prezzo 
di copertina. 


La pratica dello ZX Spec- 
trum 

1. BASIC approfondito e 
introduzione al linguaggio 
macchina 

2. programmazione in lin- 
guaggio macchina 

di Xavier Linant de Bellefonds 
e Marcel Henrot 

ed. E.P.S.I. 

C ’è spazio sia per i libri stranieri che 
per quelli italiani in questa puntata 
di PRINT: i secondi sono degnamente 
rappresentati dai due libri di cui sopra, 
diretti, come detto nell’introduzione, non 
ai programmatori principianti, ma a chi 
già possiede una discreta conoscenza del 
BASIC. Anche gli altri due titoli presenti 
in questa rubrica hanno, chi più chi meno, 
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questa caratteristica, ma chi si trova alle 
prime armi non disperi: nei prossimi nu- 
meri troveranno collocazione diverse rea- 
lizzazioni di buon livello dirette ai princi- 
pianti. 

Tornando a “La pratica dello ZX Spec- 
trum”, trattasi, dicevamo, df un libro per 
utenti già avvezzi al BASIC e desiderosi 
di migliorare le loro capacità programma- 
tone. Azzeccatissima, in questo senso, la 
scelta di dividere l’argomento in due libri 
diversi, acquistabili insieme oppure sepa- 
ratamente, consentendo a chi non si sen- 
ta pronto (o adatto..., all’uso del l/m) di 
temporeggiare, facendo un acquisto suc- 
cessvo o al limite accontentarsi (si fa per 
dire) della prima parte. Teniamo comun- 
que a precisare che entrambi i libri sono 
assolutamente indipendenti l’uno dall’al- 
tro; l’unico tipo di collegamento fra essi 
è una certa uniformità di linguaggio e di 



approccio, dovuto - potrete rendervene 
conto consultando le prime pagine del se- 
condo libro - a un rapporto di collabora- 
zione presente tra i due autori. E questo 
dovrebbe tranquillizzare anche i potenzia- 
li acquirenti di entrambe le opere, che 
temono di comprare due “tomi” assoluta- 
mente slegati e fini a sé stessi. 

Il primo libro si occupa di BASIC avanza- 
to ed è diviso per argomenti, trattati in 
forma esplicativa e corredati di program- 
mi brevi, ma di ottimo livello. 

Qualche esempio? Generatore di UDG, 
programma di inserimento/modifica/cor- 
rezione/indicizzazione dati (il nucleo cen- 
trale di un data base che si rispetti) e un 
programma di trattamento testi, com- 
prendente opzioni quali centratura di tito- 
li e frasi, giustificazione automatica e, per 
chi non ama eccessivamente il word-wrap 
(l’opzione che sposta a capo, sulla riga 
successiva, una parola di lunghezza supe- 
riore a quella permessa dal margine de- 
stro dello schermo), la possibilità di spez- 
zare le parole col trattino, inserito auto- 
maticamente tra le sillabe da separare, 
scelte dall’utente. Un’opzione di questo 
genere, è bene sottolinearlo, è introvabile 
su molti celebrati programmi commercia- 
li, il più delle volte venduti a caro prezzo. 
Non manca nemmeno la parte giochi, ap- 
positamente studiata per mettere in ope- 
ra tutto quanto spiegato fino a quel mo- 
mento. 

Una sezione è dedicata alla rappresenta- 
zione grafica delle curve più comuni, in- 
cludendo la creazione di istogrammi e 
grafici, per terminare con un bel pro- 
gramma di elaborazione grafica di proble- 
mi di regressioni semplici, sezione que- 
st’ultima trattata rarissimamente in pub- 
blicazioni di questo genere (parlando 
grossolanamente, il programma in que- 
stione riesce a ricavare l’andamento di 
una curva “regolare” partendo da un in- 
sieme di punti sparsi in misura apparente- 
mente disordinata su un grafico). Tutti i 
programmi sono ottimamente commenta- 
ti e il più delle volte accompagnati da 
schermate ottenute con la stampante. So- 
no presenti, infine, sezioni dedicate alla 
spiegazione delle leggi dell’acustica musi- 
cale (propedeutiche a un uso ottimale di 
BEEP), varie routine di scroll e preziosis- 
simi consigli sull’uso del buffer della stam- 
pante come contenitore di routine in lin- 
guaggio macchina, per cui vale lo stesso 
discorso di introvabilità accennato più so- 
pra. 

Sul secondo libro non c’è moltissimo da 
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dire: è un ottimo strumento, volto all’inse- 
gnamento del linguaggio macchina, trat- 
tato gradualmente e con grande abbon- 
danza di esempi pratici e di esercizi (que- 
sti ultimi presenti anche nel primo libro) 
con relative soluzioni. Chi non si è mai 
cimentato nella tutto sommato non im- 
possibile impresa di un uso esteso del lin- 
guaggio macchina non abbia paura: intan- 
to la trattazione parte virtualmente da 
zero ed è molto chiara: inoltre il buon 
vecchio BASIC non viene mai dimentica- 
to, così che la maggior parte delle routine 
pubblicate risultano inseribili sia utilizzan- 
do un assembler sia attraverso l’uso di 
semplici e convenzionali programmi BA- 
SIC. Tra i sette capitoli di cui si compone 
“programmazione in linguaggio macchi- 
na”, vogliamo segnalare i capitoli 5 
(“Tecniche avanzate che utilizzano la ta- 
stiera e lo schermo”), 6 (“L’animazione”), 
molto ben realizzato, e 7 (“Il superviso- 
re”), contenente utili ragguagli sul siste- 
ma operativo dello Spectrum, tra cui l’in- 
dirizzo di partenza di alcune routine della 
ROM. I primi capitoli svolgono funzioni 
prevalentemente introduttive e di esem- 
pio e il libro termina con la consueta elen- 
cazione dei codici mnemonici dello Z80. 
Rilievi comuni ad entrambi i titoli sono 
innanzitutto la stampa dei listati, di otti- 
mo livello e sicuramente ottenuti con una 
stampante professionale (anche se, in- 
spiegabilmente, i primi due sono stati rea- 
lizzati con una Seikosha o similare, la 
stessa utilizzata per la riproduzione delle 
schermate) e, in secondo luogo, la tradu- 
zione: nessun problema per ciò che ri- 
guarda la comprensione del testo, però 
sarebbe stato meglio trovare un tradutto- 
re magari competente a livello tecnico, 
ma più esperto in italiano...; si tratta in 
ogni modo di questioni stilistiche o forma- 
li, tali da non inficiare il valore complessi- 
vo dell’opera, che merita di essere letta 
(e utilizzata) da tutta la sfera di utenti già 
descritta. 


Introducing Spectrum Ma- 
chine Code - how to get 
more speed and power (In- 
troduzione al codice mac- 
china dello Spectrum - co- 
me ottenere maggiore po- 
tenza e velocità) 

di Ian Sinclair 

ed. Granada Publishing 

Ian Sinclair, autore già noto ai lettori di 
PRINT (e - lo ripetiamo per dissipare 
qualunque equivoco - assolutamente 
estraneo al più noto Sir Clive!), ritorna 
alla nostra attenzione con questo libro 
sul linguaggio macchina, per permette- 
re agli utenti Spectrum di ottenere la 
velocità e certi effetti speciali non con- 
sentiti da alcun genere di BASIC, com- 
preso quello già di per sé “tartarugoso” 
dello Spectrum. 


INTRODUCING 

SPECTRUM 

MACHINE CODE 

How to get more 
speed and power 

& & n 

& 

<&>' 

IAN SINCLAIR 


L’approccio di “Introducing Spectrum 
Machine Code” è decisamente differen- 
te da quello de “La pratica dello ZX 
Spectrum”; la prima differenza notevo- 
le è di essere scritto in inglese, anziché 
tradotto, precludendone così l’uso ai 
non conoscitori della lingua d’Albione 
(a sollievo di tutti gli altri, comunque, 

10 stile è estremamente lineare, tanto 
che con l’aiuto di un buon vocabolario 
perfino i più scarsi potranno ottenere 
risultati soddisfacenti). Il libro vuole poi 
presentarsi come introduttivo - l’auto- 
re tiene a sottolinearlo - per cui la trat- 
tazione, sebbene meno approfondita, è 
molto più completa e riesce a dare al 
lettore una buona immagine del funzio- 
namento complessivo dello Spectrum, 
naturalmente esaminato dal punto di vi- 
sta dell’utilizzatore del linguaggio mac- 
china. Un capitolo dopo l’altro vengono 
affrontati tutti gli aspetti dell’Assem- 
bler, alternandoli a diagrammi e spiega- 
zioni concernenti la struttura generale 
dello Spectrum. In certi casi l’analisi si 
spinge fino quasi alla pignoleria, tanto 
che potrete vedere, fra le altre cose, 
una tabella del tempo impiegato dal 
microprocessore dello Spectrum per 
eseguire le più usate istruzioni dell’As- 
sembler! E questo dovrebbe bastare an- 
che a dare un’idea della documentazio- 
ne dell’autore. 

11 libro comincia con un’analisi generica 
dello Spectrum e dello Z80, entrando 
subito nel vivo al capitolo 2, dove potre- 
te vedere come lo ZX procede alla me- 
morizzazione delle variabili, nonché sco- 
prire qualche interessante locazione do- 
ve “pokare” a volontà per intervenire 
sui listati BASIC. A proposito: anche 
qui, nel caso non ci si senta a proprio 
agio col linguaggio macchina, permane 
la possibilità di un utilizzo del BASIC, 
anche se non completa come in “La 
pratica dello Spectrum”. La maggior 
parte dei programmi in BASIC si trova 
infatti nel capitolo 6 (“Byting deeper”), 


dopo avere precedentemente esamina- 
to registri, accumulatori e gli effetti del- 
le varie operazioni eseguibili su di essi. 
Naturalmente, ogni programma è pre- 
sente anche in versione Assembler. 
Seguono un capitolo dal titolo abbastan- 
za autoesplicativo (“INS and OUTS”) e 
“Debugging and more programming”, 
anche questo senza bisogno di spiega- 
zioni particolari. Da notare, al termine 
del libro, sette dettagliatissime appendi- 
ci comprendenti una bibliografia consi- 
gliata, le modalità Spectrum di tratta- 
mento dei numeri rappresentati in vir- 
gola mobile, i meccanismi di codifica de- 
gli array, una semplice tabellina dei vari 
modi di indirizzamento dello Z80 (utile, 
più che altro, per una maggiore chiarez- 
za), la già citata tabella dei tempi di 
esecuzione (sapevate che, per tornare 
al BASIC dopo avere eseguito una qual- 
siasi routine in linguaggio macchina lo 
Spectrum impiega 2.857142 milionesi- 
mi di secondo?), la immancabile lista dei 
codici mnemonici e, per concludere, la 
tabella dei codici ASCII alfanumerici 
dello Spectrum (quelli, per intenderci, 
che vanno dallo spazio vuoto - codice 
32 - fino al simbolo di copyright (CHR$ 
127), escludendo i caratteri di controllo 
iniziali e i “token” del BASIC). 

In definitiva, anche questo “Introducing 
Spectrum...” ci sembra degno di segna- 
lazione: non solo per il suo contenuto 
tecnico di ottimo livello, ma anche per 
la trattazione discorsiva e brillante, 
spesso ai limiti deH’umorismo. 


Spectrum Adventures — a 
guide to playing and wri- 
ting adventures (Lo Spec- 
trum e gli adventure game 
- guida al gioco e alla ste- 
sura delle avventure) 

di Tony Bridge e Roy Carnell 
ed. Snnshine 


Crediamo che la lettura di un libro come 
questo sia appassionante come giocare 
un adventure game... con la sola diffe- 
renza che qui non esistono enigmi da 
risolvere o segreti da svelare, ma tutto 
vi viene spiegato e illustrato fino nei più 
piccoli particolari, con grande chiarezza 
e sense of humour. “Spectrum Adven- 
tures” è, oltretutto, unico nel suo gene- 
re, in quanto non è esattamente classifi- 
cabile in una categoria. Un libro di pro- 
grammi? No, perché la prima metà del 
libro non ne contiene neppure uno. Un 
libro di spiegazioni? Forse, ma non del 
tutto. Una “summa” di consigli per gio- 
care con successo la vostra avventura 
preferita? In fondo, nemmeno questo. 
Dunque? Ecco, si potrebbe dire, generi- 
camente (in fondo era chiaro dall’ini- 
zio!), che questo libro tratta di avventu- 
re, ma in modo assolutamente diverso 
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da quanto fatto finora, evitando il peri- 
colo di una trattazione arida, “scientifi- 
ca” e distaccata. Gli autori mirano a 
sviluppare e instillare, nei lettori dispo- 
sti a lasciarsi coinvolgere, una sorta di 
filosofia dell’adventure game, un tipo di 
partecipazione completamente diverso 
da quello degli arcade, sempre estrema- 
mente freddi e alteri nel loro rapporto 
col giocatore. Insomma, ridea di fondo 
costantemente presente nel libro è quel- 
la di far avvertire un “feeling”, una cer- 
ta qual affezione nei confronti dell’av- 
ventura. E chiaro che per affezionarsi a 
un tipo di gioco (e non, badate bene, a 
“un” gioco!) occorre conoscerlo, farne 
propria la storia e le caratteristiche; a 
questo obbiettivo mira la prima metà 
del libro, dove vi possiamo garantire 
che non troverete una linea di program- 
ma. Al contrario, questa parte è di per 
sé stessa una grande avventura, parten- 
do dalle origini - non informatiche - 
del gioco di ruolo, il cosiddetto “role 
playing”, da cui si può far discendere, 
in un ipotetico albero genealogico, l’av- 
ventura computerizzata moderna. At- 
traverso il racconto, l’analisi, la presen- 
tazione di esempi tipici di gioco il lettore 
seguirà una specie di corso universita- 
rio, “storia dell’avventura”, imparando 
a conoscere i giochi celebri, a partire 
dal mitico “Dungeons and Dragons” per 
approdare a realizzazioni recenti come 
“Lo Hobbit”, toccando almeno una ven- 
tina dei giochi più belli appartenenti a 
questo filone. Prima di, per così dire, 
darsi da fare in prima persona (passan- 
do alla seconda parte) l’appassionato 
potrà anche gustare un piccolo diziona- 
rietto di situazioni, luoghi e... mostri di 
facile reperibilità in ogni adventure che 
si rispetti, il tutto sempre (stavamo di- 
menticandocene) trattando alla stessa 
stregua ogni variante di genere, dal 
classico adventure “solo testo” (esem- 
pio: “The Island”) all’adventure grafico 
(come l’ultimissimo “Lords of Mi- 
dnight”, primo episodio di una trilogia 
scritta da Mike Singleton per la Beyond, 
contenente 4000 - quattromila - loca- 
zioni diverse, ciascuna osservabile da 
otto angolazioni differenti...), passando 
per gradi di interattività sempre ere- 
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scenti fino ad arrivare al combattimento 
in tempo reale di “The Valley” o alle 
decisioni autonome dei personaggi de 
“Lo Hobbit”. Dicevamo dei mostri o, 
più genericamente, degli “incontri”: ne 
sono citati più di trenta, che non è il 
caso di elencare in questa sede. 

A questo punto, però, sorge legittimo il 
dubbio di leggere la recensione di un 
libro probabilmente bello e interessan- 
te, ma di nessun valore pratico: ed è 
qui che passiamo ad occuparci della se- 
conda metà di “Spectrum Adventures”, 
“L’occhio del Guerriero delle stelle” 
(The Eye of thè Star Warrior), intera- 
mente dedicata alla progettazione e 
realizzazione di un’avventura semigrafi- 
ca (grazie a un largo uso di UDG) di 
300 locazioni per lo Spectrum. Di que- 
sta avventura viene fornito e spiegato 
tutto: perfino la leggenda da cui prende 
spunto il gioco. Ogni singolo aspetto 
della costruzione del programma viene 
dettagliatamente esaminato, illustrato e 
realizzato, riportando le appropriate su- 
broutine (lunghe a volte non più di 
due/tre linee) “ritagliate” dall’intermi- 
nabile listato completo dell’avventura, 
interamente presentato nelle ultime 40 


pagine del libro. “The Eye of thè Star 
Warrior” gira sui 48K, ma gli autori si 
sono premurati di fornire provvidenziali 
consigli ai possessori di 16K, che voglia- 
no tentare un adattamento (possibile, 
certo, ma che per ovvie ragioni impove- 
risce prevedibilmente il programma). 
Per la precisione, i vari capitoli della 
seconda metà del libro riguardano crea- 
zione del campo di gioco, posizionamen- 
to di oggetti e “incontri”, grafica, routi- 
ne di movimento, azioni possibili, incan- 
tesimi, mappe, SAVE e pause del gioco, 
il tutto naturalmente comprendendo an- 
che i dettagli di minore importanza, ma 
ugualmente determinanti ai fini della 
riuscita del gioco. Le appendici presenti 
riguardano alcuni esempi ingranditi del- 
la grafica definita, le istruzioni del gioco 
(per fortuna...), la tabella delle variabili 
utilizzate e, come già detto, il listato 
completo dell’avventura, che merita si- 
curamente la fatica dell’inserimento del 
programma. E più facile, adesso, ren- 
dersi conto di quale era l’obiettivo degli 
autori nello scrivere “Spectrum Adven- 
tures” e cosa intendevano per filosofia 
dell’avventura: leggendo (e lavorando 
sopra) questo libro è possibile conosce- 
re storia e leggenda dell’argomento, 
avere un’idea più che chiara di come 
funziona, come si progetta e come si 
scrive un’avventura; in più, si dispone 
di un adventure game completo, origi- 
nale, di ottimo livello, pronto per essere 
migliorato, personalizzato, riadattato, 
arricchito o, per i pigri a oltranza, gioca- 
to a volontà. Tutto questo non è certo 
poco. Difetti? Uno solo: il linguaggio, 
nel senso che il libro è in lingua origina- 
le. Vi assicuriamo però che, mai come 
questa volta, la modesta fatica della tra- 
duzione (fra l’altro l’inglese usato è, co- 
me al solito, piuttosto semplice) vi ripa- 
gherà, in termini di divertimento e inte- 
resse, in modo più che soddisfacente. 

I libri possono 
essere ordinati 
utilizzando 
il coupon pubblicato 
a pag. 98 


È IN 
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In questa puntata di ZX CLUB trovere- 
te veramente di tutto un po’... compresa 
una anticipazione interessante. E, per 
non crearvi eccessivi brividi da attesa 
spasmodica, andiamo subito a incomin- 
ciare! 

Gli annunci di ZX CLUB 

Più che “gli annunci” forse sarebbe me- 
glio dire “l’annuncio”, visto che, appun- 
to, ce n’è... uno solo. Non per questo, 
però, non merita la nostra consueta at- 
tenzione: 

Si è costituito il COMPUTER CLUB CI- 
RIE per utenti Sinclair. Oltre 500 pro- 
grammi, libri e riviste a disposizione dei 
soci. Per informazioni scrivere (allegan- 
do un francobollo) o telefonare a 
Pasquale SPERANZA 
loc. Vastalla 80 
10073 CIRIÉ TO 
telefono 011/9236137 

Le notizie di ZX CLUB 

Più che le notizie, ecco l’anticipazione 
di cui si parlava: gli amici del GRUPPO 
UTILIZZATORI COMPUTER SIN- 
CLAIR NAPOLI, sempre attivissimi 
(pensate che il loro bollettino, a partire 
dal numero 5, viene realizzato su cas- 
setta, toccando oltretutto ottimi livelli 
qualitativi), hanno spedito un loro invia- 
to, Emilio TRIUNFO - ben conosciuto 
dai lettori di ZX CLUB - nientepopodi- 
meno che a... Londra, in visita agli sta- 
bilimenti Sinclair. Nelle foto che pubbli- 
chiamo potete vederlo in circostanze 
che non lasciano dubbi in proposito. La 
cosa interessante è che il caro Emilio 
ha pensato di scrivere alcuni articoli in 
proposito, toccando numerosi punti che 
riteniamo estremamente interessanti. 
Siamo in attesa di ricevere il materiale 
in questione, che pubblicheremo non 
appena sarà possibile. 

Sempre grazie al Gruppo Utilizzatori 
Computer Sinclair di Napoli, questa vol- 
ta grazie alla cortesia del dottor DELLA 
GUARDIA, siamo lieti di pubblicare una 



1 1 


Emilio Trionfo in quadrato in Willis 
Road, sede del palazzo amministra- 
tivo della Sinclair Research... 


... questa volta ripreso addirittu- 
ra insieme a Sir Clive Sinclairl 


perfetta riproduzione in assonometria 
della città di Antescher, teatro di batta- 
glia del famosissimo gioco “Ant At- 
tack”. La pubblichiamo qui di segui- 
to, convinti di fare cosa gradita a tutti 
gli appassionati del capolavoro della 
Quicksilva (nonché a chi, incuriosito, co- 
mincerà ad informarsi in proposito: sap- 
pia fin d’ora che si tratta di uno dei più 
bei giochi mai scritti per lo Spec- 
trum...). 

Come al solito, vi diamo l’indirizzo del 
gruppo: 

GRUPPO UTILIZZATORI COMPU- 
TER SINCLAIR 
c/o Roberto CHIMENTI 
via Luigi Rizzo 18 
80124 NAPOLI NA 
telefono 081/7623121 
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I programmi di ZX CLUB 

Questa settimana è la volta del SIN- 
CLAIR CLUB ROMA-TALENTI, con 
un programma tutto sommato molto 
semplice, insolito e brevissimo, che vi- 
sualizza... schedine per l’Enalotto com- 
pletamente casuali. A detta dell’autore, 
Massimo D’ASCENZO, l’uso del pro- 
gramma gli ha consentito di ottenere un 
10 e alcuni 9. Che il programma doti lo 
Spectrum di misteriose facoltà paranor- 
mali? In ogni caso, lo proponiamo lan- 
ciando una piccola sfida: mandateci il 
vostro programma di pronostici di qua- 
lunque genere (Totocalcio, Totip, lotte- 
ria Italia, cadute del governo, andamen- 
to della borsa, esito dell’interrogazio- 
ne...); i più simpatici, geniali e abili sa- 
ranno pubblicati sulle pagine di ZX 
CLUB. 

Prima di lasciarvi al programma, anco- 
ra due cose: la prima è che il prossimo 
programma del Sinclair Club Roma- 
Talenti sarà ben più elaborato (e diver- 
tente), mentre la seconda è, più sempli- 
cemente, l’indirizzo del Club. 
SINCLAIR CLUB ROMA-TALENTI 
c/o Massimo D’ASCENZO 
via F. D’Ovidio 109 
00137 ROMA RM 
telefono 06/8280043 

Enalotto 

di Massimo D’Ascenzo 



La pianta completa di Antescher, la città di Ant Attaclc abitata dalle 
formiche giganti. L’entrata è sul lato destro, appena più in basso 
rispetto alla metà del muro perimetrale. 


Sinclair Club Roma-Talenti 
versione per ZX Spectrum 
16K/48K 


5 

GO SUB 1001 


1 0 

PAPER 6: BORDER 6: INK 1 
CLS 

1 5 

LET X= 1 4 


1 7 

PRINT AT 0,0;" 
UALE" 

SCHEDINA 

20 

FOR A= 1 TO 1 2 


25 

REM A= numero 

partita 

30 

LET B= INT (90* 

RND +1) 

40 

IF B< = 30 THEN 

GO TO 70 

50 

IF B< = 60 THEN 

GO TO 89 

60 

IF B> 60 THEN 

GO TO 109 

70 

IF A= 4 OR A=7 

o 

> 

II 

o 


THEN GO SUB 

1 000 

71 

PRINT A; 


75 

PRINT TAB X;" 

- 1" 

80 

GO TO 500 


89 

IF A=4 OR A= 7 

OR A= 1 0 


THEN GO SUB 

1 000 

90 

PRINT A; 


95 

PRINT TAB X;" 

- X" 

1 00 

GO TO 500 


109 

IF A=4 OR A=7 

OR A= 1 0 


THEN GO SUB 

1 000 

1 1 0 

PRINT A; 


1 1 5 

PRINT TAB X;" 

- 2" 


500 NEXT A 
505 PRINT 

510 PRINT "FINE COLONNA" 

530 PRINT 
535 PRINT 

600 INPUT "Un'altra colonna (S/N 
) ?MAX 4 " ; g$ 

610 IF g$="S" OR g$="s" THEN 
LET X=X- 4 : GO TO 17 
680 PRINT FLASH 1; "BUONA FORTU 
NA E BUON 12" 

800 STOP 

1000 PRINT : RETURN 

1001 BORDER 6: PAPER 6: INK 1: 

CLS 


1 005 

PRINT 

AT 2,8;" 

{ 3SG8 } { 2 G 8 } 


{SG8} {2G8} {SG8} {2G8} {3SG8 

1 008 

PAUSE 

30 


101 0 

PRINT 

AT 3,8;" 

{SG8 } 


{ 2SG8 } {SG8 } 

{SG8 } 


{ SG8 } " 

1 


101 2 

PAUSE 

30 


1 01 5 

PRINT 

AT 4,8;" 

{ 3SG8 } 


{SG8} 

{ 2SG8 } 

{ 3SG8 } " 

1 01 8 

PAUSE 

30 


1 020 

PRINT 

AT 5,8;" 

{SG8 } 


{SG8 } 

{SG8 } 

{SG8 } {SG8 } 

1 023 

PAUSE 

30 
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1 025 

1 028 
1 030 


1 032 
1 035 


1038 
1 040 


1042 
1 045 


1 048 
1 050 


1 055 
1 060 

1 065 

1 1 00 
1 1 50 


PRINT AT 6,8;" {3SG8} 

{ SG8 } { SG8 } {SG8 } { SG8 } " 

PAUSE 30 

PRINT AT 10,4;" {SG8 } 

{ 3SG8 } { 3SG8 } {3SG8} 

{ 3SG8 } " 

PAUSE 30 

PRINT AT 11,4;" {SG8 } 

{SG8 } {SG8 } { SG8 } 

{ SG8 } { SG8 } {SG8 } " 

PAUSE 30 

PRINT AT 12,4;" {SG8 } 

{SG8 } {SG8 } { SG8 } 

{ SG8 } { SG8 } {SG8 } " 

PAUSE 30 

PRINT AT 13,4;" {SG8} 

{SG8 } {SG8 } { SG8 } 

{SG8 } { SG8 } {SG8 } " 

PAUSE 30 

PRINT AT 1 4 , 4 ; " { 3SG8 } 

{ 3SG8 } {SG8 } { SG8 } 

{ 3SG8 } " 

PAUSE 30 

PRINT AT 1 8 , 2 ; "by Cinzia e 
Massimo D'Ascenzo" 

PRINT AT 20, 2; "del Sinclair 
Club Roma-Talenti" 

FOR Y=0 TO 21 

PAPER 4 : BORDER 4 : OVER 1 : 
PRINT AT Y , 0 ; " 


1200 PAUSE 30 
1 250 NEXT Y 
1300 PAUSE 15 
1400 OVER 0 
2000 RETURN 


QUIZ: 

Come è possibile interrompere 
l’esecuzione del programma 
100 input LINE $ 

110 GO TO 100 

??? 


UHI 

«IfldNI «! do *S„ 
ip ofSBessam un euauo |§ *9 o*s 
•si |i anpaviqas ‘ojnuiazd o|op 
-nano» ‘a XJIHS SdVD 

: 3NOIZniOS 
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Vendo e cambio software per Spec- 
trum. Dispongo di più di 150 titoli fra 
cui: Hobbit, Atic Atac, Alchemist, Hin- 
ter Killer. Scrivere, inviando la propria 
lista o telefonare ore pasti. Risposta 
sicura. Guido Baldi - Via Silvio Pellico, 
29 • 00040 Pomezia (RM) - Tel. 
06/9111264 

Vendo o cambio programmi per ZX 
Spectrum 16 o 48 Kbyte; L. 2.000 per 
16 Kbyte, L. 3.000 per 48 Kbyte. Di 
spongo di circa 100 programmi. Massi 
mo Buso - Via Della Resistenza, 16 
34074 Monfalcone (GO) - Tel. 43272 

Vendo, cambio programmi per ZX 
Spectrum (56/48 Kbyte), 48 Kbyte so- 
prattutto. Richiedetemi la lista che in- 
vierò gratuitamente. Simone Frosimi - 
Via Cesalpino - 52100 Arezzo 

Vendo e/o cambio programmi per ZX 
Spectrum 48 Kbyte tra i quali: Harrier 
Hattack, Cookie, Android One, Pac 
Man, Labirinto 3D, Colour Clash, 
Pssst, Dama e tanti altri. Telefonare 
ore serali. Sandro Basso - via Santa 
Maria, 122 - 80010 Quarto (NA) - Tel. 
8761357 

Vendo e/o cambio giochi per ZX Spec- 
trum 48 Kbyte. Telefonare ore serali. 
Posseggo: Cookie, Labirinto 3D, Har- 
rier Hattack, Colour Clash, Pac Man, 
Android one. Vittori Carosone Via S. 
Maria, 122 80100 Quarto (NA) - Tel. 
8761843 

Vendo per Spectrum programmi di 
ogni tipo a L. 1.000 cadauno (Tennis, 
Calcio, Fighter Pilot, ecc.). Telefonare 
o scrivere a: Alberto Raggi Via Gari- 
baldi - 47100 Forlì - Tel. 0543/31907 

Disponendo di un notevole archivio 
software vendo a L. 10.000 cassétta 
con 5 giochi a scelta per Spectrum. 
Cambio software Spectrum con soft- 
ware Commodore 64. Telefonare ore 
pasti o scrivere a: Ivano Parbuono Via 
A. Di Cambio, 4 - 37138 Verona Tel. 
045/568649 

Vendo o cambio programmi per ZX 
Spectrum da 16/48 Kbyte, vendo cas- 
setta con 1 programma o gioco a L. 

3.000. Alessandro Guidi ViaRavegna- 
na, 48 47100 Forlì - Tel. 0543/28851 

Vendo, cambio programmi per ZX 
Spectrum 16/48 Kbyte. Inviatemi il vo 
stro elenco per scambio, vi invierò il 
mio, oppure richiedete la mia lista per 
acquisti. Fabrizio Mosconi Via Roma 
nello da Forlì, 15 - 00176 Roma Tel. 
06/2771257 (ore pasti) 

Cambio, compro, vendo software su 
cassetta per Spectrum 16/48 Kbyte. 
Per accordi telefonare ore serali o seri 
vere inviando la propria lista. Rispondo 
a tutti. Roberto Morosi - Piazza IV No 
vembre, 9 - 20035 Lissone (MI) - Tel. 
039/484901 


Cambio software per ZX Spectrum, se 
completo di fotocopia delle istruzioni 
originali. Maurizio Monaldi - Via Vitto- 
rio Montiglio, 7 - 00168 Roma 

Vendo ZX Spectrum 48 Kbyte, 4 mesi 
di vita, più 50 programmi su cassetta, 
manuale in italiano e numerosi listati, il 
tutto a L. 450.000. Marco Mogliotti 
Via Ricciardi, 4 - 14100 Asti. Tel. 
0141/55340 

Vendo ZX Printer più 5 rotoli di carta 
più alimentatore più manuale . 120.000. 
Vendo inóltre interfaccia joystick della 
Tecnoleo . 70.000. Paolo Ballocci Via 
S. Gottardo, 75 - 20052 Monza (MI) 
Tel. 039/367709 

Cercasi Sinclaristi, zona Eur o limitro- 
fe, per scambi software Spectrum. Te- 
lefonare ore pasti o scrivere inviando 
propria lista. Risposte sicure. Guido 
Baldi Via Silvio Pellico -00040 Pomezia 
(RM) - Tel. 06/9111264 

Cambio software per Spectrum. Even 
tualmente acquisto, se i prezzi sono 
convenienti. Mandare lista, con prefe- 
renza per programmi per radioamato 
ri. Terese Mele • Via Matteotti, 130 - 
84036 Sala Consilina (SA) - Tel. 
0975/21041 

Per ZX Spectrum cambio software di 
qualsiasi tipo e memoria. Tutti gli inte- 
ressati possono telefonare o scrivere. 
Risposta assicurata. Turra Fulvio - Vià 
Arrigo Boito, 55 - 35074 Monfalcone 
(GO) - Tel. 0581/42823 

Vendo, cambio software per Spectrum 
16/48 Kbyte. Dispongo di programmmi 
Utilities, molti fantastici giochi: Pac 
Man, Q Bert, Konghy, Backgammon, 
Dama, Poker ed altri ancora. Chiedete 
il listino gratuito e mandate la vostra 
lista. Carmelo Nicoletti Via Serreliga 
Lotto E 87100 Cosenza Tel. 
0984/31331 

Vendo, cambio software ZX Spec 
trum. Alcuni titoli sono Flight Simula 
tion, Chequered Flag, Chess e molti 
altri. I programmi sono da 16/48 Kbyte. 
Per ricevere, scrivere a: Fabio Moro 
Via Rivellese, 20 00019 Tivoli (RM) 
Tel. 0774/27601 

Cambio, vendo software 16/48 Kbyte 
per ZX Spectrum. Un programma L. 

2.000. Inviatemi la vostra lista e vi sarà 
inviata la mia. Alessandro Geraci - 
Piazza Roma, 8 22050 Colico (CO) 
Tel. 0341/941258 


Compro ZX Spectrum 16 Kbyte al 
prezzo massimo di L. 250.000. Per con 
tatti scrivere o telefonare ore pasti a: 
Luigi Zanni - Via Pisa, 11 - 3 1100 Trevi-, 
so - Tel. 0422/25519 

Vendo, cambio software per ZX Spec 
trum su disco 5’/4“. Se hai un FDD 
System Sandi, posso fornirti le versioni 
su disco di molti giochi e Utilities (per la 
maggior parte in Assembler). Piero 
Nannucci Via Isarco, 55 50047 Prato 
Tel. 0574/23115 

Compro programmi originali di utilità, 
grafica, gestionali, per uso scolastico e 
professionale preparati per ZX Spec 
trum. Inviare listini specificando le ca- 
ratteristiche principali dei vostri pro- 
grammi e i prezzi. Giulia Gagliano 
Vierio, 13/b 230159 Milano 

Vendo interfaccia joystick programma 
bile per Spectrum (Marca Tenkolek) 
completa di cassetta dimostrativa e 
istruzioni a L. 80.000 (attuale costo L. 
117.000). Scrivere a: Gian Luca Rocca - 
Via Madonna dei Campi, 15 
24057ignano (BG) 

Vendo stampante Seikosha GP 100A 
con interfacce, comunicazione seriale 
RS232 e porta parallela Centronics 
completa del relativo software, il tutto 
come nuovo e in imballo originale a L. 

600.000. Antonio Zaino Via Pascoli, 
9/a 20082 Binasco (MI) Tel. 

02/9055655 (ore 18.30 - 19.30) 

Compro per ZX Spectrum programmi 
per 48 Kbyte a non più di L. 3.000. 
Possibilmente “I Puffi", “Zaxxon" e 
“Decathlon 4 *. Claudio Ciabattini Via 
Cosimo Ridolfi, 4 - 50129 Firenze Tel. 
055/474619 

Cambio, compro, vendo software per 
ZX Spectrum (anche programmi inedi 
ti). Scrivere o telefonare ore pasti. Dan 
te Lenti Via Foscolo, 16 17058 Vo 
ghera (PV) - Tel. 0383/47472 

Vendo ZX81 espanso a 16 Kbyte com- 
pleto di: alimentatore, manuale italia- 
no, cavetti, molti programmi. Tutto in 
ottime condizioni a L. 150.000 trattabi 
lissime. Telefonare orario negozi. Mas 
simo Aghemo - Via Piscina, 59 - 10060 
Scalenghe (TO) - Tel. 011/9866023 

Cerco programmi di sismica e applica 
zioni geologiche varie per ZX Spec 
trum. Cerco anche listati di programmi 
sullo stesso argomento, ma per altri 
home computer. Telefonare ore pasti. 
Salvatore Terranova - Via XX Settem- 
bre, 38 %017 Noto (SR) - Tel. 

0931/837287 

Attenzione! Vendo o cambio program- 
mi per ZX Spectrum 48 Kbyte. Vendo 
anche 4 libri sul BASIC e sulla pro- 
grammazione dello Spectrum. Simone 
Bonciani Via Filzi, 18 - 56100 Pisa Tel. 
050/27766 


Vendo o cambio programmi per ZX 
Spectrum (100). Cerco compilatore 
BASIC e stampante ZX printer a L. 
75.000 80.000. Piergiorgio Cicciardel- 
lo - Via Volturno, 30 P.P.l - 20047 Bru 
gherio (MI) 

Vendo software per ZX Spectrum 
16/48 Kbyte. Posseggo numerosissimi 
programmi tra cui: Manie Miner, Ant 
Attack, Atic Atac, Flight Simulation, 
Chequeved Flag, Calcio, ecc.). Prezzo: 
L. 3.000 per 16 Kbyte, e L. 4.044 per 48 
Kbyte più spese di spedizione. Lietti 
Pieraldo Via Cantù, 3 22036 Erba 
(CO) - Tel. 031/611535 

Compro software spaziale, di azione e 
di avventura, ad alta risoluzione per lo 
ZX Spectrum 16/48 Kbyte al prezzo 
massimo di L. 5.000. Inviatemi la vostra 
lista. Andrea Gridi - Via Consolare Va- 
leria, 436A 98013 Contesse (ME) 

Vendo centinaia di programmi 16-48 
Kbyte per ZX Spectrum, anche ultime 
novità; vendo inoltre espansione 48 
Kbyte nuova, originale inglese a L. 

80.000. Richiedere lista. Francesco 
Caizzi Via Yacopi, 69 41 100 Modena 
Tel. 059/21164 

Cambio programmi su cassetta (ne ho 
circa 150) per ZX81. Possiedo molte 
routines e utility in LM. Oppure vendo 
tutti in blocco a L. 30.000 più spese di 
spedizione. Stefano Furiarli Via Vitto- 
rio Emanuele, 26 20052 Monza (MI) 

Per ZX Spectrum vendo floppy disk 5 
pollici originale Sandy con interfaccia 
più 5 dischi in omaggio a L. 750.000 
trattabili. Il floppy è da 400 Kbyte. Per 
informazionm rivolgersi a: Luigi Tolo- 
melli Via Martini, 15 - 51016 Monteca- 
tini Terme Tel. 0572/73175 

Vendo sintetizzatore vocale Speech e 
Sound Currah per ZX Spectrum come 
nuovo a L. 75.000. Massimo Millozzi 
Via Bonparto, 6 00125 Roma Tel. 

06/6061266 

Cambio, vendo, compro software per 
Spectrum 16/48 Kbyte. Per ricevere la 
lista dei miei programmi scrivetemi o 
inviatemi la vostra oppure telefonate 
ore serali. Offro giochi e utilità. Sergio 
Novella - Via Maddaloni, 6/5 - 16128 
Genova Tel. 010/582027 

Cambio, vendo software ZX Spectrum 
(anche programmi inediti). Vendo 
scacchiera elettronica (9 livelli) 
Morphy Edition. Antonio Catalano - 
Via Ernesto Basile, 86 00128 Roma 
Tel. 06/5206229 

Compro programmi per ZX81 16 
Kbyte che non siano giochi. Sono parti- 
colarmente interessato a software in 
LM. Invia il tuo listino con prezzi a: 
Giuseppe Soriente via Portaromana, 
100 - 84015 Nocera Superiore (SA) 


SUPERSINC LIBRI 

CEDOLA DI ORDINAZIONE - CASSETTE 
de compilare e spedire in busta chiusa a 
J.soft - Via Rosolimi, 12 - 20124 Milano - Tel. 6888228 

Ordino i seguenti libri per un importo totale di L + L. 2.000 

come contributo fisso per spese di spedizione 

Cod Cod Cod 

Cod Cod Cod 

□ Contanti allegati □ Assegno allegato n° 


1 

LA PRATICA DELLO ZX SPECTRUM voi. 1 cod. AESC006 L. 13.500 
LA PRATICA DELLO ZX SPECTRUM voi. 2 cod. AESC007 L. 13.500 
INTRODUCING SPECTRUM MACHINE 

CODE cod. BGRC009 L. 19.900 

SPECTRUM ADVENTURES - A GUIDE TO PLAYING 

AND WRITING ADVENTURES cod. BSUC007 L. 14.900 


Nome 

Cognome 

Via 

Città C.A.P. 

Se richiesta fattura: 

Cod. F. e P. Iva 


□ Ho spedito l’importo a mezzo vaglia postale 

□ Ho versato l’importo sul cc. n° 19445204 intestato a J.soft - Milano 

□ Pagherò in contrassegno al postino al ricevimento dei volumi (valido solo per i 
soci in Italia) 



Data 

Firma 


Per i residenti all’estero - pagamento anticipato (vaglia o versamento su ns. ccp) 


r 

SUPERSINC 

CEDOLA DI ORDINAZIONE - LIBRI 
da compilare e spedire in busta chiusa a 
si. soft - Via Rosolimi, 12 • 20124 Milano - Tel. 6888228 


SOFTWARE zip-zap 

MOLAR MAUL 


cod. DIGMS05 
cod. DIGMS04 


L. 14.000 
L. 14.000 


Ordino i seguenti libri per un importo totale di L + L. 2.000 

come contributo fisso per spese di spedizione 


Cod Cod Cod. 

Cod Cod Cod. 

□ Contanti allegati □ Assegno allegato n° 


□ 

□ 



Ho spedito l’importo a mezzo vaglia postale 

Ho versato l’importo sul cc. n° 19445204 intestato a J .soff - Milano 
Pagherò in contrassegno al postino al ricevimento delle cassette 


Nome 

Cognome 

Via 

Città C.A.P. 


Se richiesta fattura: 

Cod. F. e P. Iva 

Data 

Firma 

Per i residenti all’estero - pagamento anticipato (vaglia o versamento su ns. ccp) 


r 


r 




SUPERSINC 

INPUT/OUTPUT 


La rubrica INPUT/OUTPUT è gratuita ed aperta 
a tutti i lettori. Chi desidera comprare, vendere 
o cambiare hardware o software può inviare il 
tagliando a J.soft - Via Rosolimi, 12 • 20124 MI- 
LANO 


SUPERSINC è bello, però... (ovvero suggerimenti, 
idee, critiche, richieste e tutto ciò che vi passa per 
la testa). 


□ COMPRO □ VENDO □ CAMBIO 

□ ZX80 □ ZX81 □ ZX Spectrum □ PERIF. Q SOFTWARE 


Nome 

Via .. 



.Cognome 


C.A.P. 
. .Tel. 


y 


Nome Cognome 

Via C.A.P. 

Città Tel. 


V 


J 
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v 



CEDOLA DI ORDINAZIONE OFFERTA DISCHETTI 

Da compilare e spedire in busta chiusa a 
J. soft - via Rosellina Ì2 - 20124 Milano 
Tel. 02/6888228 - 683797 - 6880841 - 6880842 - 6880843 


Ordino i seguenti dischetti, in confezione da 10 pezzi cad., per un importo 


totale di L IVA e spese di spedizione incluse. 

: N dischetti (minimo 10 e multipli di 10) 


Contanti allegati 

□ Assegno allegato n° 

Ho spedito l'importo a mezzo vaglia postale 

□ Ho versato l'importo sul CCP n° 19445204 intestato a J. soft - Milano 

□ Pagherò in contrassegno al postino al ricevimento dei dischetti 


Nome 

Cognome 

Via 

CAP Città Prov 

Se richiesta fattura - codice fiscale 

Data Firma 

Offerta valida solo per l'Italia. 





PERSONAL COMPUTER: 
le prime, le migliori! 


PERSONAL SOFTWARE: 



L'unica che presenta 
software per tutti i personal: 
Commodore, Apple, Sinclair, T.I., 
HP, Sharp, Sega, Olivetti, ecc. 
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SUPERBIT - 64 pagine di progr 
per i vostri personal computer 


amm 


; x 

■». i-V»< - 

M 

Wm L \ ’ vw 


(yM , tj \ V. VA S? 


Ilii'-ft™ 



j®38r /feSS 

L jynjfxivyp 

•ìM 

L Jnr%M 

-'V\ -fllval 



